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auf Diskette. 
Aufeinem alten Schloß sind Sie der "gute 
Geist”” und bewachen den geheimen 
Schlüssel. 

Natürlich versuchen Diebe, den Schlüs- 
sel zu stehlen, diese müssen dann recht- 
zeitig gestellt werden. 


In Gewölben lauern dann noch schlangen- 


ähnliche Gestalten, die Ihr ”"Geisterle 
ben” bedrohen. 


Ihre Aufgabe wird zusätzlich erschwert, 


da Sie als Geist in diesem Spiel nicht 


durch Wände und Türen gehen können. 
Ein ansprechendes Spiel für jedermann 


geeignet. 


KIT X 


Ein originelles Geschicklichkeitsspiel ® 


+++ FORMELSAMMLUN 


Mit über 700 Formeln, 3 Tabellen- 
werken, integrierten wissenschaftlichen 
Taschenrechner, _Schlagwortregister, 
automatischer Datensicherung, opti- 
scher Benutzerführung, voller Menue- 
steuerung und automatischer Datenüber- 
nahme zu weiteren Formelsammlungen 
seien hier nur einige der wichtigsten Pro- 
gramminhalte aufgeführt. 

Dem Anwender wird mit diesem Pro- 
gramm die Möglichkeit gegeben, in vor- 
handene Formeln Werte einzusetzen. 
Das Ergebnis ist abspeicherbar und kann 
in weiteren Formeln und Formelsamm- 
lungen verwendet werden. Ein spezieller 
Zeichensatz unterstützt die Bildschirm- 
darstellung von Sonderzeichen. 


Um eine schnelle Orientierung und ge- 
zielten Programmzugriff zu ermög- 
lichen, ist eine Formelsammlung des 
Girardet Verlages beigelegt. 

Folgende Formelsammlungen werden 
in Kürze lieferbar sein: 

Physik. Mathematik I & II. Chemie. 
Elektronik. Statik. Elektrotechnik. 
KFZ-Technik. Sanitärhandwerk. Me- 
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tallgewerbe. Bau-Holzhandwerk. 
Programm auf Diskette. erhältlich bei 
Dynamics. Hamburg. 


KW KR KHK 


MAHN 64” 


Zur einfachen Erfassung rückständiger 
Zahlungen und automatischen Aus- 
druck einer Mahnung dient das Pro- 
grammodul MAHN 64. Der Anwender 
wählt einen zuvor erstellten Text aus. 
per Knopfdruck wird der Text mit allen 
wichtigen Daten des Schuldners auf 
dem Drucker ausgegeben. Sortierte 
und selektierte Ausgabe aller Außen- 
stände auf dem Bildschirm oder 
Drucker ist möglich. 

Die Daten werden automatisch aus 


FAKTURA 64 und LAGER 64 
übernommen. 

Programm auf Diskette. erhältlich bei 
Dynamics. 

Hamburg 


“LAGER 64” 


Das Programm LAGER 64 bietet die 
ideale Ergänzung zur FAKTURA 64. 
ist jedoch ein eigenständiges Pro- 
gramm, daß zur Verwaltung von Lager- 
beständen eingesetzt wird. 

Das Programm verwaltet 1000 Da- 
tensätze, die wahlweise aufgeteilt. der 
Lieferantenanteil oder Artikeldatei zu- 
geordnet werden. Das Programm un- 
terstützt2 Laufwerke. Druckeradressen 
sind einstellbar. Eine sortierte und se- 
lektierte Ausgabemöglichkeit von La- 
gerlisten ist ebenso selbstverständlich. 
wie die automatische Berechnung des 
Lagergesamtwertes. 

Die Daten werden automatisch in 
FAKTURA und MAHN 64 übernom- 
men. 

Programm auf Diskette. erhältlich bei 
Dynamics. Hamburg 


KREIEREN 
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“FAKTURA 64” 


Diese Fakturierung ist eines der lei- 
stungsfähigsten Programme auf dem 
Commodore C-64 überhaupt. Vorbild- 
lich in der Benutzerführung, menuege- 
steuert. bildschirmorientiert und mit 
erklärenden Texten, die jederzeit ab- 
gerufen werden können, erfüllt das Pro- 
gramm alle Wünsche des Anwenders. 
Das Programm verwaltet 1000 Da- 
tensätze, die wahlweise aufgeteilt. der 
Kundendatei. Lieferantendatei oder 
Artikeldatei zugeordnet werden. Fest- 
werte wie Mehrwertsteuer. Rabatt- und 
Skontosätze werden einmal erfaßt, ge- 
speichert und vom Programm auto- 
matisch eingesetzt. Das Programm un- 
terstützt bis zu zwei Laufwerke. 
Druckeradressen sind einstellbar. Bis 
zu 9 Druckmasken können frei erstellt 
werden. der Ausdruck von Kopien ist 
selbstverständlich. Das Programm er- 
laubt die Ausgabe der Daten im 
DATEV-Format. Um dem Datenschutz 
Rechnung zu tragen. verwehrt ein Pass- 
wort Unbefugten den Zugriff auf das 
Programm. Die Daten werden auto- 
matisch in LAGER 64 und MAHN 64 
übernommen. 

Programm auf Diskette. erhältlich bei 
Dvnamies. Hamburg. 
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Ein neues superschnelles 3-D Welt- 
raumspiel von Activision. Sie sind Com- 
mander eines Raumschiffes und müssen 
auf Ihrem Flug gefährliche Hindernisse 
überwinden. 

Tolle Grafik- und Soundeffekte gibt's 
ebenfalls, langweilig ist Beamrider 
garantiert nicht. 

Verschiedene Sektoren müssen von 
feindlichen Raumschiffen geklärt wer- 
den, mit einem "Zeitsprung” gelangt 
man in den jeweiligen Sektor. Eines der 
vielen Weltraumspiele, hebt sich aber 
durch grafische Rafinessen ab. 
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Nach der HIFI-Video im Au- 
gust hatte der Freak keine 
Muße, in mehrwöchigen Ur- 
laub zu fahren. Schon Anfang 
September stand der nächste 
Termin auf dem Plan. 

Der Marktführer unter den 
Herstellern von Heimcom- 
putern, Commodore-Büroma- 
schinen GmbH, hatte nach 
Frankfurt geladen und - wie es 
so schön heißt - alle, alle 
kamen. 


Ihr HOMECOMPUTER 
war natürlich auch an- 
wesend. Nicht nur, weil sich 
im Roeske-Verlag wieder 
einmal Nachwuchs einge- 
stellt hat (nach CPU ist nun 
die wöchentliche COM- 
PUTE MIT... für Commodo- 
re-User hinzugekommen). 
sondern ganz einfach des- 
halb. weil wir natürlich im- 
mer dort sein müssen, wo ir- 
gendetwas los ist. 

Wenn sich eine Firma im 
Rahmen einer Sonderver- 
anstaltung dem breiten Pu- 
blikum präsentiert, so emp- 
fiehlt es sich im allgemeinen. 
dieses Unternehmen auch 


vom 6. - 8. September 1984 


innerhalb eines Ausstel- 
lungsberichtes vorzustellen. 
Nun. bei dem Initiator der 
vorliegenden Messe dürfen 
wir uns das wohl schenken. 
Von der Frankfurter Tochter 
des amerikanischen Compu- 
ter-Giganten hat sicher auch 
derjenige schon etwas ge- 
hört. der RAM füreine falsch 
geschriebene Margarine- 
Marke hält. 

Verweilen Sie also nicht 
lange. sondern begleiten Sie 
uns auf unserem kleinen 
Rundgang durch Halle I des 
Frankfurter Messegeländes. 


Die CFA. die schon miteiner 
guten Portion Vorschußlor- 
beeren bedacht worden war. 
öffnete am 6. September zum 
4. Mal ihre Pforten. Ausstel- 
ler aus Deutschland, Öster- 
reich. der Schweiz, Schwe- 
den und England suchten 
nicht nur Kontakt zueinan- 
der und den diversen Händ- 
lern in der Branche. Sie woll- 
ten vor allem auch den ei- 


gentlichen Kunden. d.h. 
professionelle wie private 
Computer-Anwender,  er- 
reichen. Auf über 4000 


Quadratmetern wurde denn 
auch so zieml'ch alles ge- 


boten. wassich annähernd in 
die Warenbereiche Hard- 
ware. Software. Zubehör und 
Literatur einordnen läßt. 

Der Commodore-Stand war 
natürlich besonders umla- 
gert. Die Computer-Spezia- 
listen aus der Lyoner Straße 
in Frankfurt-Niederrad hat- 
ten sich denn auch mehr als 
die Organisation der Ausstel- 
lung einfallen lassen. Com- 
modore wartete mit einem 
kleinen Profi-Pavillon auf. 
in dem man die unterschied- 
lichen Rechner für Klein- 
und Mittelbetriebe bestau- 
nen undauch fachlich in Au- 
genschein nehmen konnte. 
Darüber hinaus war ein 
schon von anderen Messen 
her bekanntes und beliebtes 
Rondell aufgebaut. an dem 
die Homecomputer-Freaks 
auf ihre Kosten kommen 
konnten. Und dies umso- 
mehr. als viermal täglich 
wertvolle Software und C-64 
Computer verlost wurden. Die 
ernsthaften Interessenten 
hatten zusätzlich Gelegen- 
heit, an diversen "Work- 
shops” teilzunehmen. die 
tiefer in die Materie der 
Commodore-Rechner und 
aller Zusatzgeräte ein- 
führten. So sprach Burkhard 
Rosin aus Braunschweig 
über "Datenstrukturen und 


-formate der Floppy 1541”, 


Jim  Butterfield (Toronto) 
über die neue Commodore- 
Generation (plus/4. C-16. 
116). Horst Labusch. der 
Autor des "Grandmaster'- 
Schachprogrammes. über 
Commodore-Assembler. und 
Dr. Clemens Deisenhammer 
aus Salzburg informierte die 
Anwender von Commodore- 
Computern über die Mög- 
lichkeiten von BTX. DFÜ 
und Teletex. 

Angesichts dieser massiven 
Öffentlichkeitsarbeit hätten 
Beobachter versucht sein 
können. für die übrigen Aus- 
steller von schlechten Start- 
chancen zu sprechen. Dem 
war aber ganz und gar nicht 
so. sondern beflügelte sie so- 
gar. zumalmancherim Wind 
des Organisators selgeln 
konnte (man denke an die 
vielen Anbieter speziellen 
Commodore-Zubehörs). 
Der Software-Händler "Mi- 
ero-Händler” aus Mönchen- 
Gladbach präsentierte seine 
neuesten Software-Hits für 
die Commodore-Renner 
VC-20 und C-64 und hatte 
viel jugendliches Publikum 
um seinen Stand versam- 
melt. 

Der Schulbuchverlag We- 
stermann. den man früher 
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ausschließlich mit Atlanten 
und verschiedensten Unter- 
richtswerken in Verbindung 
brachte. betätigt sich inzwi- 
schen mit großem Engage- 
ment in Sachen Lern- und 
Ausbildungsprogrammen für 
Homecomputer. Ähnliches 
hatten wir in den letzten Aus- 
gaben von HOMECOM- 
PUTER bereits vom Spiele- 
Fabrikanten Otto Maier aus 
Ravensburg gemeldet. Um 
bei Verlagen zu bleiben, so 
hat sich Langenscheidt auf 
der B der Space-Inva- 
ders-Idee etwas Drolliges 
einfallen lassen. Keine Au- 
Berirdischen greifen an. son- 
dern unsympathische Gesel- 
len. die schon ganze Schüler- 
Generationen zur Verzweif- 
lung brachten, nämlich 
Vokabeln. Man kann nur 
von Glück sagen, daß sie 
nicht einfach hingenommen 
werden müssen: Langen- 
scheidt stellt eine "Vokabel- 
falle” vor, die einer gut be- 
stückten Weltraum-Basis 
gleichkommt. 

Vom Lernen zur Musik: Das 
Thema "Computer als Syn- 
thesizer” fesselt immer mehr 
Menschen. Schon jetzt kann 
man sagen, daß der Heim- 
computer eines der beliebte- 
sten Musikinstrumente ist. 
Kein Wunder. daß die 
Stände zweier Firmen umla- 
gert waren. die sich auf 
derartige Angebote spezia- 
lisiert haben. Wersi-electro- 
nic gab dem interessierten 
Publikum Gelegenheit. das 
fabelhafte WERSI-BOARD 
unter die Lupe zu nehmen, 
mit dem man schon für weni- 
ger als fünfhundert Mark aus 
seinem 64er eine Top-Orgel 
machen kann. Orgel-Schmidt 
wartete mti einer ganzen Pa- 
lette leistungsstarker Pro- 
gramme auf. die aus Ihrem 
Commodore einen vollwerti- 
gen Konzert-Synthesizer 
machen können. 

Adcomp Datensysteme aus 
München präsentierten ne- 
ben vielen anderen interes- 
santen Features für Profis 
und Semi-Profis auch ihr 
Produkt "64+”, ein Steckmo- 
dul. das nicht nur den Com- 
modore 64-Befehlssatz auf 
Basic 4.0 erweitert, sondern 
gleichzeitig einen vollwerti- 
gen IEEE-488-Bus mit Plati- 


nenstecker bietet. 
Aztec-Software” wartete mit 
einem Sprachmodul auf. das 
nicht nur eine ernstzuneh- 
mende Konkurrenz zu Cur- 
rahs Microspeech darstellt, 
sondern - und das ist für en- 
gagierte Programmierer si- 
cher interessant - in unbe- 
grenzter Zahl Vokabeln er- 
zeugen kann. Da Aztec sein 
"Speakeasy” für die be- 
kanntesten Heimcomputer 
anbietet, erübrigt sich fast 
der Hinweis, daß man auch 
eine C-64er Version zur Ver- 
fügung stellt. 

SmallBusıness erhebt in 
Sachen Fremdsprachen ei- 
nen hohen Anspruch. 

Die  Software-Spezialisten 
von SM verweisen darauf. 
daß ihr neues Lernkonzept 
"Softlearning” nicht irgend 
ein Computer-Sprachkurs. 
sondern ein System sei. das 
auf jüngsten tiefenpsychologi- 
schen Erkenntnissen basiere. 
Nicht der Einsatz des Com- 
puters sei das Entschei- 
dende. vielmehr der Um- 
stand. daß "Softlearning” die 
Technik des Vokabel-Ler- 
nens als solche revolutio- 
niere. 2000 wirklich be- 
haltene Vokabeln in nur 14 
Tagen stellen somit kein un- 
erreichbares Ziel mehr dar. 
Bislang sind die SM-Sprach- 
kurse für Englisch. Italie- 
nisch. Spanisch und Fran- 
zösisch zu haben -weitere 
Sprachen sollen aber in 
Kürze folgen. 

Die Zubehörfirma COMTEC 
bietet nicht nur "garantiert 
stückgeprüfte” Disketten (8 
bzw. 5.25”/m. Verstärkungs- 
ring). sondern darüber hin- 
aus ein umfangreiches Sorti- 
ment an Aufbewahrungssy 
stemen für wertvolle Daten- 
träger: Safes und Tresore. die 
sowohl feuergeschützt als 
auch sturz- und löschsicher 
sind. 

Groß war das Angebot der 
verschiedenen Software- 
Häuser. KINGSOFT aus 
Roetgen bei Aachen war mit 
"Zaga” vertreten, einem Vi- 
deospiel der allerjüngsten 
Generation: 60K reine Ma- 
schinensprache, fast schon 
zu realistische 3D-Grafik 
und ein Sound. der alle Regi- 
ster moderner Heimcom- 
puter zieht. 


—— EA Sf 


Aus Schweden kam 'handic- 
software”, bekannt durch das 
Finanzplanungsprogramm 

"Caleresult”. Die "ad- 
vanced” Version hat statt 
zwei nun drei Dimensionen 
(32 Seiten. 254 Zeilen. 64 
Spalten. soll jedoch minde- 
stens ebenso bediener- 
freundlich sein wie die kon- 


ventionelle Ausgabe. 
HANDIC bot aber auch eine 
Menge anderer Software. vor 
allem für den Commodore 
64. an: FORTH-64 (eine Pro- 
grammiersprache der "vier- 
ten Generation”), STAT-64 
(ein Basic-Toolkit für statisti- 
schen Einsatz). REL-64 (pro- 
grammgesteuerte Apparate- 
Kontrolle. beispielsweise für 
die Steuerung der elektri- 
schen Eisenbahn-Anlage). 
MON-64 (die "perfekte" Ter- 
minplanung für mittleres 
Management). GRAF-64 
(grafische Analyse von Glei- 
chungen) und vieles mehr. 
Wenn wir von Nachwuchs 
im Hause HOMECOM- 


PUTER sprachen. so ist hier 
sicher noch ein Wörtchen an- 


gebracht: der Roeske-Verlag 
stellte aufder CFA sein jüng- 
stes Kind der Öffentlichkeit 
vor. genannt "Compute 
mit...”. Damit wurde eine 


Serie wöchentlich erschei- 
nender Magazine aus der 
Taufe gehoben. die sich ge- 
zielt der bekanntesten Heim- 
computer annehmen sollen 


Anfang machte man 
ich mit den Commo- 
dore-Rechnern als den Markt- 
führern. 

10000 Hefte der Erstausgabe 
waren wie nichts an die Mes- 
sebesucher gebracht. von de- 
nen es sich viele nicht neh- 
men ließen. auf die brand- 
neue Spezialzeitschrift mit 
einem Glas Sekt auf Kosten 
der glücklichen Familie des 
Roeske-Verlages anzustoßen. 
Wir hoffen. daß unser Rund- 
gang. die gegebenen Infor- 
mationen wie auch die 
zahlreichen Bilder bei Ihnen 
ein wenig von der Stimmung 
aufkommen zu lassen. die an 
allen Ausstellungstagen auf 
der 4. CFA in Frankfurt 
herrschte. (sk) 
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Die Organistionsform bringt 
es mit sich: dezentrale, ver- 
teilte EDV-Leistung muß in 
der Lage sein, miteinander 
oder mit anderen zukommu- 
nizieren. Meist werden eine 
größere Anzahl von Bild- 
schirmarbeitsplätzen über 
gemeinsame Datenleistun- 
gen von einem Hostrechner 
(Zentralsystem) oder Com- 
puter-Netzwerken mit Daten 
versorgt. Und übermitteln im 
umgekehrter Richtung ei- 
gene Daten. Das erfordert 
datentechnische Koordi- 
nation aller Übertragungs- 
wege, damit jeder den ande- 
ren versteht und auch 
elektronisch alles zusam- 


Hannover - Zunächst ver- 
hinderte im April die ange- 
spannte Weltmarktsituation 
für elektronische Bauteile 
die Markteinführung des 
Koffercomputers PDC CLIP- 
PER. Der anschließende 
Metallarbeiterstreik brachte 
den Zeitplan nochmals 
durcheinander. Jetzt hat die 
Joint Production - Partner 
Siemens die ersten Einheiten 
aus dem Werk Lanklaar/ 
Belgien geliefert. Zeit genug 
für PDC. den Produktstart 
systematisch vorzubereiten. 
Ein Programm für verschlüs- 
selte Datenfernübertra- 
gung (DFÜ) zeigt. daß auch 
an der Softwareentwicklung 
kräftig gearbeitet wurde. 

Laut Pressemitteilung der 
Professional Data Computer 
GmbH ist eine Kapital- 
erhöhung des Unterneh- 
mens auf 510.000 DM zu ver- 
melden. Im Laufe des am 1. 
Mai begonnenen Ge- 
schäftsjahres soll nochmals 
eine Verdopplung auf 1,02 
Mio. DM erfolgen. Inzwi- 
schen wurde auch die Soft- 
warebasis verstärkt. Auf ei- 
nen Vertrag mit SM-Soft- 
ware München gründet die 
Palette mit Textverarbeitung. 
Adressverwaltung, Daten- 
bank. Dateimanagement 
und visuelle Kalkulation. In 


NETWAY - Das Netzwerkkonzept für Bildschirm- 


menpaßt. 

Mit NETWAY liefert die 
Firma TANDBERG DATA 
eine fertige Kommu- 
nikationssteuerung für ihre 
Bildschirm-Arbeitsplätze. 
Zur Kommunikation un- 
tereinander und mit Fremd- 
systemen aller Art. In jeder 
möglichen Schaltungstech- 
nik. NETWAY ist ein kom- 
paktes Steuermodul mit eige- 
ner interner Rechnerlogik 
und -kapazität. 

Die eigene Rechnerintelli- 
genz macht NETWAY für 


alle denkbaren Mehrbe- 
nutzer-Varianten geeignet: 


als Multiplexer. Datenkon- 
zentrator,  Protokoll-Kon- 


Zusammenarbeit mit der 
Universität Braunschweig 
entsteht derzeit ein umfas- 
sendes Businessgraphik-Pro- 
gramm. das die wesentlichen 
Funktionen der Wirtschafts- 
statistik mit umfangreicher 
graphischer Ergebnisdar- 
stellung verbindet. Dabei 
wird das PDC Super Basic 5.0 
mit komfortablen Makros 
für bewegliche 3-D-Graphik 
und Tonunterstützung ge- 
nützt. Dieses Extended Basic 
ist nunmehr serienmäßig zu 
dem ebenfalls residenten 
Microsoft-Basic 2.0 vorhan- 
den. übertrifft diese heut- 
zutage meistgebräuchliche 
Version jedoch mit 143 zu- 
sätzlichen Befehlen. Aus- 
führlich dokumentiert im 200 
Seiten starken Program- 
mierhandbuch in deutscher 
Sprache. Basic-Compiler. 
Makro-Assembler. Program- 
mierkits und ein Programm- 
paket für betriebswirtschaft- 
liche  Vergleichsrechnung 
rundet das Software-Grund- 
angebot ab. 

Eine völlig neue Dimension 
der Kommunikation zwi- 
schen zwei Mikros ist das 
von PDC im eigenen 
Hause entwickelte Chiffrier- 
programm Secretline, bei 
dem es keinerlei mathemati- 
schen Zusammenhang zwi- 


verter,.  Cluster-Controller 
(d.h. Verbundspeicher-Kon- 
trolleinheit), Knotenpunkt- 
steuerung oder Steuerein- 
heit für allgemeine Netze 
über X25 oder andere 
Leitungsprozeduren. NET- 
WAY überwacht dabei alle 
Übertragungswege und führt 
darüber statistisch Protokoll 
sowie  Leitungsdiagnosen. 
die jederzeit abgefragt wer- 
den können. 

Als typische Anwendung 
bieten sich dezentrale Ar- 
beitsplätze an. wo neben ei- 
nem Bildschirmterminal bei- 
spielsweise noch ein Drucker 
steht, derebenfalls von NET- 
WAY mit Daten beliefert 


schen Code und übertrage- 
nen Informationen gibt. Da 
der  Dechiffrier-Schlüssel 
nicht mitübertragen wird.ein 
Abhörer darüber hinaus zwi- 
schen an- und abgehenden 
Daten nicht unterscheiden 
kann. ist die Dechiffrierung 
nach heutigen Maßstäben 
praktisch ausgeschlossen. 
Neben dem militärischen 
Einsatz werden alle Kommu- 
nikationsebenen erschlos- 
sen. wo das Abhören durch 
Fremde oder unbefugte Be- 
triebsangehörige ausgeschlos- 
sen werden soll. Die chiff- 
rierte. durch Benutzerpaß- 
wort geschützte Ablage von 
Texten und graphischen 
High-Resolution Abbildun- 
gen auf 3 Zoll Mikrodiskette 
sichern vor unberechtigten 
Zugriff nach der Kommu- 
nikation. 

In der Kommunikation lie- 
gen ohnehin die Stärken des 
PDC CLIPPER. Über die 
Schnittstelle X-21 wird der 
Zugangzu DATEV Pbzw. zu 
entsprechenden internatio- 
nalen DFÜ-Netzen gewähr- 
leistet. Darüber hinaus ist 
über Akustik-Koppler die 
Teilnahme am Telex/Tele- 
tex-Verkehr möglich. Ein Te- 
lexadapter steht heute bereits 
zur Verfügung Das an- 
gekündigte Btx-Modul ist 


Arbeitsplätze 


wird. Der Zugang zu NET- 
WAY ist durch Code-Worte 
geschützt. Unterstützt wer- 
den die verschiedensten Pro- 
zeduren (Siemens. IBM, Uni- 
ac usw.), was die Einsatz- 
möglichkeiten auf eine brei- 
te, dem Markt gerecht wer- 
dende Anwenderbasis stellt. 
Die komplette Steuereinheit 
ist nicht viel größer als ein 
Aktenkoffer (38x45x19 cm) 
und wiegt nur ca. 20 kg. Der 
interne Z-80 Mikroprozessor 
steuert gleichzeitig eine inte- 
grierte 800 KByte Floppy- 
Disk oder eine 15 MB Fest- 
platte (optional). 


fertig. Die endgültige Liefe- 
rung hängt jedoch von der 
Verfügbarkeit des Valvo- 
Chips ab. Der Zugang zu in- 
ternationalen Datenbanken 
wird bei der Einwahl durch 
softwaremäßige Unterstüt- 
zung von Kommunikations- 
sprachen wie beispielsweise 
GRIPS oder MAGIC ermög- 
licht. So wird mit der Euro- 
päischen Commission über 
den Einsatz es PDC CLIP- 
PER im größten europäi- 
schen Datenbanknetz Euro- 
Net verhandelt. Der Schritt 
in den Export wird durch die 
eines Zeichensatzes in arabi- 
scher Sprache weiter for- 
ciert. 

Vorwärts geht es nach Aus- 
sage von PDC auch mit dem 
Mediencomputer Contrast. 
bei dem alle bildschirm- 
orientierten Medien in ei- 
nem Computer zusammen- 
arbeiten: Zentraler Farb- 
rechner, Farb-TV. Video, 
Btx. Videotext. Bildscanner - 


unterstützt von Kamera, 
Videocopy-Printer und 3 
Zoll Mikrofloppy. Inzwi- 


schen ist für dieses Projekt 
die Förderung des Bundes- 
ministers für Forschung und 
Technologie (BMFT) ange- 
laufen. 
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: T, n 
Computer/Leistungsdaten el 3 
ROM-Länge ° Auflösung Auflösung Farbfählgket Handbuch BUS-System Betrielissystem Zeichen 
Text Grafik j Editierbar 
16 Kb 32x24 236x192 Ja gut [1 [11 a 
Deutsch 
BIT 90 
12Kb 0x2 26 x192 a sehr gut son [[}) Ja 
APPLE Ile 
18 Kb, 40x24 320 x 192 u schlecht son Bon a 
Deutsch , 
ATARI 800 XL 
Bedingt 80x25 520 x 200 f}) sehr gut son [2 Nah 
Ei Mer Zoichensätze 
Sharp MZ 700 
"200 40x26 320 x 200 Ja gut sk sn Ja 
Deutsch 
CBM 64 
16 Kb 32x16 256x192 . Englisch so [L}} Nein 
Dragon 32 
16. Kb 32x24 64x48 N) Englisch BR [1 Nein 
ORIG 1 
20 Kh 40x25 320 x 300 Nein so son Nein 
CBM 3000 
. 8b xı8 128 x48 Nein Englisch [0 [111 Nein 
TRS 80 Ill 
VIDEO GENIE 
16 Kb 212 176x158 a gut son son a 
Deutsch 
VC-20 
[1 32x24 64x48 Nein gut BB [1 Nein 
Deutsch B 
ZX-81 
16.Kh 32x16 256 1192 "a gut [0 BR . 
ZA Spectrum 
26 Kh 22x24 256x192 u gut {I} 16.88 N) 
T1-99/4A 
{L) 32x24 128 x 96 1} sehr gut so son Nein“ 
Deutsch 
LASER 210 
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Ein Programm für alle Fußballfreunde 
und besonders für Tototipper. 


Wenn Sie das Programm starten, er" 


scheint ein Menü. Haben Sie den 
Spieltag gewählt, fragt Sie das Pro- 
gramm, welchen Spieltag Sie haben 
möchten. Ist der Spieltag eingegeben, er- 
scheinen die Spielpaarungen. Sie können 
Tore eingeben, indem Sie die beiden An- 
fangsbuchstaben der Mannschaften tip- 
pen. Der Tototipper kann sich auch vom 
Computer beraten lassen: er braucht nur 
den Spieltag einzugeben. Das Programm 
ist auch für die nächsten Jahre zu ge- 
brauchen, wenn man die Zeilen 110-120 
so verändert, daß die Auf- und Absteiger 
berücksichtigt werden und in den Zeilen 
400-560 in Spielpaarungen geändert 
werden. 


Variablen-Liste 


Schleifen-Variablen 

1,X,51,52,Q 

Z= Zeile 

SPA= Spalte 

TEAM= Mannschaft 

TOR= TORE (Mannschaft. Spieltag) 
PUN= Punkte 

TP= Plustore 

TM= Minustore 

TD= Tor-Differenz 

KL= Klassenwert der Mannschaft 
SP= Spieltag 

RUECK= Rückrunde 

TA= Tabelle 

TIP= Computer Tip 

CT= Computer Tip (Tore) 

CTT= Computer Tip (Tore) 

ZEIT= Zeit (für die Tabellenberech- 
nung) 

110-120: Data-Zeilen: Mannschaften 
400-560: Data-Zeilen: Spieltagpaarun- 


gen 

770-870: Tabellenberechung 
880-970: Tabellensortierung 
1210-1260: Computertipberechnung 
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für den TI 99/Extended Basic 


186 CALL\SCREEN(4) 2: Z=2 8: 
DIM TEAM$ (18) , TOR(18,34) „FUN 
(18) ,TP(18),TM(18),TD(18 
),KL(18) 
116 DATA WERD. BREMEN, UERDING 
EN, A. BIELEFELD, RB. MUENCHEN, E. 
B'SCHWEIG,1.FC KOELN,K'L 
AUTERN, STUTTGART , KARLSRUHE, W 
ALDHOF M. 
126 DATA LEVERKUSEN, DUESSELD 
ORF,VFL BOCHUM, FRANKFURT, BR. 
GLADBACH, SCHALKE 64,BO.D 
ORTMUND,, HAMBURG 

130 DATA 5,13,10,2,15,8,12,3 
‚18,12,6,11,17,9,4,16,14,1 
140 RESTORE 136 :: FOR I=1 T 
0 18 :: READ KL{I):s NEXT I 
150 RESTORE 11@ :: FOR I=1 T 
O0 18 :: READ TEAM$(TIE» NEXT 
1 
166 DISPLAY AT(4,.2)ERASE ALL 
2 "%*%**BUNDESLIGA*#*1984/85%*%** 
"32 DISPLAY AT(12,3):2"1 

TABELLE" :: DISPLAY AT(14, 


S)BEEP:"2 SPIELTAG" :: DISP 
LAY AT(16,39:"3  COMPUTE 
R TIP" 


176 DISPLAY AT(16,1) 2 "TASTE" 
12 DISPLAY AT(18,3):"4 ERG 

EENISSE EINLESEN" :: DIS 

PLAY AT(20,3):"5 ERGEBNISSE 
SPEICHERN" :: DISPLAY AT(22 
‚B:"6 ENDE" 

189 CALL KEY(6,K,9):: IF 9=6 
THEN 186 ELSE IF K=49 THEN 

746 ELSE IF K=56 THEN 19 

@ ELSE IF K=51 THEN TIP=1 :: 
GOTO 190 ELSE IF K=52 THEN 
1060 ELSE IF K=53 THEN 1 

12@ ELSE IF K=54 THEN 1276 E 
LSE 60TO 186 

196 DISPLAY AT(12,2)ERASE AL 
L BEEP:"GEBEN SIE DEN SPIELT 
AGB EIN" 3: DISPLAY AT(14 
„11er 1-34)" 

266 ACCEFT AT(16, 13) VALIDATE 
(DIGITISIZE(®IBEEF:SP :: IF 
sP<i OR SP}34 THEN 200 

216 IF SP>17 THEN SP=SP-17 : 
» RUECK=1 ELSE RUECK=® 

220 ON SF 60TO 230,240,250,2 
60, 279,280, 290,300, 310, 320,3 
30,340, 350, 360, 370, 380,3 

96 

230 RESTORE 406 :: GDTO 576 


240 RESTORE 416 :: GOTO 57% 

256 RESTORE 426 :: GOTO 578 

266 RESTORE 430 :: GOTO 576 

27% RESTORE 440 :: GOTO 57% 

280 RESTORE 456 :: GOTO 576 

296 RESTORE 466 :: GOTO 576 

RESTORE 476 :: GOTO 576 

RESTORE 486 :: GOTO 576 

ö RESTORE 496 :: GDTD 57% 

a RESTORE 5606 :: GOTD 57% 

&. RESTORE 510 :: GOTO 576 

& RESTORE 520 :: GOTO 576 

9 RESTORE 536 :: GOTD 578 

RESTORE 546 :: GOTD 5376 

ö RESTORE 550 GOTD 57% 

ö RESTORE 56% :: GOTO 570 

100 DATA 1.2,3,4,546, 7,89,9,1 

8,11,12,13,14,15,18,17,18 

41@ DATA 18,15,14,11,12,9,16 

7,8556: 3,4,1,2,17,16,13 

426 DATA 1,6,3,845,10,7,12,9 
„14,11,16,2,4,17,15,13,18 

430 DATA 18,11, 14, 7,12,5,10, 
3,8,1,6,2,4,17, 15,13,16, g 

230 DATA 1,18,3,12,5,14,7,16 
„9,18,11,15,4,6,2,8,17,13 

456 DATA 18,7,14,3,12,1,10,2 

‚8,4,6,17,13,11,19,9,16,5 

460 DATA 1,14,3,16,5,18,7,15 

.9,13,6,8, 4, 10,2,12,17, 11 

476 DATA 18,3,14,2,12,4,10,6 

.8,17,11,9,13;,7,15,5, 16,1 

480 DATA 1, 18,3,15,5,15,7,11 
„8,10,6,12,4,14,2,16,17,9 

490 DATA 18,2,14,6,12,8,16,1 

7,9,7,11,5,13,3,15,1,16,4 

560 DATA 1,13,3,11,5,9, 16,12 

‚8,14,6,16,4,18,2,15,17,7 

518 DATA 18,6,14,16,12,17,7, 

5,9,3,11,1,13,2,15,4,16,8 

526 DATA 1,9,3,7,12,14,16,16 

,8,18,6,15,4,13,2,11,17,5 

550 DATA 18,10,14,17,5,3,7,1 

‚9,2,11,4,13,6,15,8,16,12 

546 DATA 1,5,3,17,12,18,16,1 

5,8,13,6,11,4,9,16,14,2,7 

550 DATA 18,14,3,1,5,2,9,6,1 

1,8,15,12,17,16,7,4,13,10 

566 DATA 1,17,14,15,12,13,16 

‚11,8,9,6,7,4,5,2,3,16,18 

576 IF TA THEN RETURN ELSE I 

F RUECK THEN SP=SP+17 

586 IF TIP THEN A$="COMPUTER 
TIF" ELSE A$=STR$(SPI%".SPI 

ELTAG" 

59% DISPLAY AT(1,MERASE ALL 
BEEP:A$ :: IF RUECK THEN 65 

o 

666 FOR I=1 TO 17 STEP 2 :: 

READ C,CC :: GOSUB 12086 :: Z 

=1+2 :: DISPLAY AT(Z,1): 

TEAM$(C)s: DISPLAY AT(Z,13): 

"-"; TEAM$ (CC) 

618 IF TIP THEN A$=STR$(CT)% 

"yNLSTR$ICTTIELSE A$=STR$(TO 

R(C,SPI)K"E"LSTRE TOR (CC 

„5P)) 

62@ DISPLAY AT(Z,26):A$ :: N 

EXT I 22,2=2 

636 DISPLAY AT(24,6): "WEITER 
MIT »ENTER@" z: IF TIP THEN 
119@ ELSE DISPLAY AT(22 
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„6)2"TOR EINGABE 31°" 

646 CALL KEY(6,K,S):: IF k=8 
4 THEN 686 ELSE IF K<>13 THE 
N 546 ELSE 166 

656 FOR I=1 TO 17 STEP 2 :: 
READ C„CC :: GOSUB 12066 :: Z 
=1+2 :: DISPLAY AT(Z,1): 

TEAMS (CC): DISPLAY AT(Z,13) 
2"-"3 TEAMS (C) 

666 IF TIP THEN A$=STR$(CTT) 
&"3"%STR$(CT)ELSE A$=STR$(TO 

R{CC,SP))&":"KSTR$(TOR(C 
‚sP)) 

676 DISPLAY AT(Z,26):3A$ :: N 
EXT I :: Z=2 :: GOTD 4306 

686 DISPLAY AT(12,3)ERASE AL 

L= "WELCHER CLUB HAT EIN TOR" 
»: DISPLAY AT(14,9)2"GE 
SCHOSSEN?" =: DISPLAY AT(16, 

S):"t2 ANFANGS ZEICHEN)” 

696 ACCEPT AT (18,14) VALIDATE 
(WALPHA, "1. °")SIZE(2)BEEP:A$ 
70@ FOR I=1 TO 17 STEP 2 :: 
IF A$=SEG$ (TEAM$ (I) „1,2) THEN 
TOR(I1,SF)=TOR(I,SP)+1 x 

» GOTO 210 

718 IF A$=SEG$ (TEAM$(I+1),1, 
2)THEN TOR (I+1,5P)=TOR(I+1,5 
P)+1 :: GOTO 216 

72% NEXT I 

736 DISFLAY AT(24,1) BEEP: "FA 
LSCHE EINGABE" :: FOR I=i1 TO 
390 :: NEXT I :: GOTO 6 

80 

746 FOR I=1 TO 18 :: IF TORt 
1,5P)<>©0 THEN 77“ 

756 NEXT I 

766 DISFLAY AT(10,2)ERASE AL 
L BEEP: "KEINE ERGEBNISSE VOR 
HANDEN!" :: FOR I=1 TO 3 

00 :: NEXT I :: GOTO 166 

7786 DISPLAY AT{(12,4)ERASE AL 
L»"BITTE UM ETWAS GEDULD!" : 
» TA=1 :: ZEIT=INT (SP#3. 
2+16):2 DISPLAY AT(14,7)2"CA 
."3ZEIT3 "SEKUNDEN" 

786 FOR X=1 TO SP :: IF X>17 
THEN RUECK=1 ELSE RUECK=& 
796 IF RUECK THEN J=X-17 ELS 

E J=X 

806 ON J GOSUB 230,240,250,2 
60,270, 280,290, 300, 310, 320,3 
50,340, 350,360, 370,380, 3 

76 

818 FOR I=1 TO 17 STEP 2 

826 IF RUECK THEN READ CC,C 

ELSE READ C,CC 

8536 IF TOR(C,X) >TOR(CC,X) THE 
N FUN(C)I=PUN(C)+2 :: GOTO 86 
a 

846 IF TOR{C,X)=TOR(CC,X)THE 
N PUN{ECI=FUN{C)+1 == PUN(CE) 
=PUN(EC)+1 :: GOTO 8646 


auıxı 


IE 


856 PUN{CCISPUNCC)I+2 z: GOT 
0 850 
856 TMICI=TMICI+TOR(CC, X): 
TM{CCI=STMICCIH+TOR(C, NIE: TPC 
EISTFICI+TORIC,K):: TPIC 
VSIFICEI+TORLCC. X: TDiC)= 
TPICI-TM(C):: TDICCI=STF(CC)- 
TM{CE) 
876 NEXT I z: GOSUR 1186 :: 
NEXT X 
886 FOR Si=1 TO 17 
890 FOR S2=Si+1 TO 18 
906 IF FUN{S1)>FUN(S2)THEN 9 
60 ELSE IF PUN(S1)=PUN(S2) TH 
EN 930 
918 G=PUN{S1):: G$=TEAMS (SI) 
»: F=TP(S1)2: PUN(S1)=PUN(S2 
):z TEAMS (S1)=TEAM$(S2): 
» TP(S1)=TP(S2):: PUN(S2)=G 
3: TEAM$(S2)=G$ :: TP(S2)=F 
926 K=TD(S1):: TD(S1)=TD(52) 
33 TD(S2)=K :: WESTM(SY):: T 
M(S1)=TM(S2):: TM(S2)=WE 
ı: GOTO 960 
936 IF TD(S1)<TD(S2)THEN 946 
ELSE 966 
940 M=TD(S1):: O=FUNISI):: J 
$=TEAM$(S1) 23 L=TP(St)z: TDC 
S1)=TD(S2):: PUN(S1)=PUN 
(S2):: TEAM$(SI)=TEAM$ (52) 1: 
TP(S1)=TP(52):: TD(SDI=M :: 
FUN (S2)=D :: TEAM$ (82)= 
36 23 TP(S2)=L 
950 WE=STMISI):: TM(S1)=TM(52 
Js: TM{S2)=WE 
966 NEXT 82 
978 NEXT Si 
986 Z=5 :: TA=6 :: A$="TABEL 
LE ("&STR$(SP)R".SPIELTAG) " 
»: DISPLAY AT(1,5)BEEP E 
RASE ALL:A$ :: DISPLAY AT(3, 
18):"TORE , PUN" 
996 FOR I=1 TO 18 :: 
THEN $=1 ELSE $=2 
1066 DISPLAY, AT(Z,S): 15 TEAM$ 
{Dz2 DISPLAY AT(Z,17) USING 
"##":TP(D)s: DISPLAY AT 
(Z,19)2"-" 33. DISPLAY AT(Z,2 
©) 2 USING "HH" TMCI 
161& DISPLAY AT(Z,2%) :USING 
"#44": TD(D:s IF TDED)<=O TH 
EN GOTD 1830 ELSE IF TD( 
ID)>@ AND TD(I)<16 THEN SPA=2 
4 ELSE SPA=23 
102@ DISPLAY AT(Z,SPA)SIZE(L 
DEREN 
1830 DISPLAY AT(Z,27) USING 
"HH"SPUNCD):s Z=Z+1 2: NEXT 
I 2: DISPLAY AT(24,6):"W 
EITER MIT }ENTERC" ı: 7=2 
1640 CALL KEY(@,K,8)ı: IF k« 
>13 THEN 1846 ELSE 1656 
1656 FOR I=1 TO 18 :: PUN(D) 


TEST 


De 


=0 22 TM(TD)=@ 2: TP(D=8 :: 
TD{ID)=6 :: NEXT I :: RES 
TORE 116 :: GOTO 156 

18686 CALL CLEAR :: OPEN #13" 
CS1", INTERNAL, INPUT „FIXED 1 
92 ::. INFUT #1:SF 

167& FOR I=1 TO SF 

1686 FOR Q=1 TOD 18 STEP 9 
1698 INPUT #1: TOR(9,1),TOR(@ 
+1,1) „TOR(Q+2, 1) ,TOR(Q+3,D), 
TOR (@+4, 1), TOR (Q+5, 1), TO 
Ri@+5, I) ,TOR(Q+7,1), TOR(G+8, 
D 

1186 NEXT O 

1116 NEXT I 2: CLOSE #1 :: 6 
OTD 166 

1126 CALL CLEAR :: OPEN #12" 
CS1", INTERNAL,OUTPUT,FIXED 1 
92 2: FRINT #1:5P 

1136 FOR I=1 TO SP 

1146 FOR Q=1 TO: 18 STEP 9 
1156 PRINT #1:TOR(Q,D);TOR(@ 
+1,1), TOR(@+2, I), TOR(Q+3,1), 
TOR (0+4, 1), TOR(0+5, 1), TO 
R(Q@+6, 1) , TOR (Q+7,1), TOR (Q+8, 
D 

1166 NEXT @ 

1176 NEXT I :: CLOSE #1 :: 6 
OTO 156 

1186 ZEIT=ZEIT-3 :: DISPLAY 
AT(14,7)2"CA."3ZEITS "SEKUNDE 
N" ::_RETURN 

1198 CALL KEY(9,K,8)sı IF & 
>60 THEN TIP=@ ::3. GOTO 166 EL 
SE 1196 

1266 IF TIP THEN 1216 ELSE R 
ETURN 

1218 IF KL(CI<KLICC)ITHEN 124 
o 


1226 IF {KL(C)-KLICC))>=9 TH. © 
EN 1266 

1236 CT=INT(RND*2):: CTT=INT 
{RND*S) +1 :: RETURN 

1246 IF (KLICC)-KL(C))>=9 TH 
EN CT=INT(RND*4)+1 z: CTT=IN 
T{RND*2) =: IF CT=CTT THE 

N 1246 ELSE RETURN 

1250 CT=INT(RND*B +1 23 CTT= 
INT(RND*2) 2: RETURN 

1260 CT=INT(RND*2) 2: CTT=INT 
(RND*4) +1 :: IF CT=CTT THEN 
1268. ELSE RETURN 

1270 DISPLAY AT(10,5)ERASE A 
LL BEEF: "HABEN SIE VERGESSEN 
" 322 DISPLAY AT(12,32):"E 

RGEBNISSE ZU SPEICHERN?" :; 
DISPLAY AT(16, 189) 2" (J/N)" 
1286 ACCEFT AT(16,19) VALIDAT 
EC"IN")EAS 2: IF A$="J" THEN — 
1120 ELSE END 

1296 REM: TOMISLAV RISTIC 
1300 REM AUF" BOEHLINGSHOF 49 
1316 REM 445% GELSENKIRCHEN 
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Galaxy-Fight 


für den TI-99/4A mit Extended Basic 


vFrEHHyI, I TLyMyN„Ü,OL,F,PA,MLyNL 
„TRA=STRS 
190 TITEL$,As=Y$ 


200 CALL ELEAR 3: GALL CHAR 33 CA 
FATTERN 23 CALL SOUND 2: CALL KEY 
ALL FOSITION 

210 CALL DELSFRITE :: CALL COLOR 
BRO URES 

230 ! 

240 %% ANWEISUNGEN 7 ** 

250 ! 2 

260 CALL CLEAR :: CALL SCREEN (7) 


NGEN?" :: CALL CHAR(EO,"G") 

270 CALL. COLOR(3,2,12,4,2,12,5,2, 
1 T0 27 :: CALL HCHAR(I2,3+1,ASC( 
280 CALL KEY(O,EIN,ST) ::- IF EIN= 
N=78 OR EIN=110. THEN 360 ELSE CAL. 
290 FOR I=1 TO 30 :: NEXT I 

300 CALL COLOR(3,2,8,4,2,8,5,2,8, 

27 :: CALL HCHAR(12,3+1,NEC(SEGKL 
310 CALL KEY(O,EIN,STI} IF EIN-7 


D 
D 
‘ 
0 
{} 
" 
' 
D) 
D) 
{) 
{) 
{) 
D) 
0 
' 
D 
{) 
D 
{) 
’ 
' 
‘ 
{} 
{) 
‘ 
D 
{) 
{) 
{) 
ü) 
{) 
D 
D 
' 
0 
0 
0 
' 
D) 
D) 
' 
{) 
D) 
{) 
‘ 
' 
' 
{) 
{) 
{) 
{) 
{) 
{) 
D) 
' 
' 
’ 
{) 
‘ 
D 
D) 
' 
‘ 
{) 
{) 
D) 
{) 
D 
" 
{) 


=78 OR EIN=110 THEN 460 ELSE CALL 
320 ! 
330 ! *% SPIELREGELN: *%%* 
340 ! 
350 CALL CLEAR :: FRINT "GALA 
ATZ DIESES SFIELS 15T DER WELT 
360 FRINT "SFIELER 

"SCHIFF DURCH DNS ALL UND Ss 
370 FRINT "DER FEUE TASTE DEN GEG| 
OTONENKANONE ZU ZE s:: 
380 GOSUR 


2590 
390 CALL CLEAR :: 
CRAD WENDEN, 
400 FRINT "FLI 
Bo 


UMSCHIFF 
"TAUCHT ES AUF DER GECEN-" 


’ 

L 

' 410 PRINT "AUF, DEHNOCH IST ES M 
I ONBAR ZU": I®VERLASSEN, INDEH HAN 
ı 420 CALL CLEAR :: NT SH"VERLAS 
ı E RICHTUNG WECHSELT": :", 80 MAN 
: FLIEGT." 

1.430 FRINT :" JEDOCH IST ER VOR EIN 
1 ND*: :"KANN AUCH DORT ABÜESCHÜSSE 
!NNT NACHDEN" 

! 440 FRINT : "BEIDE JOYSTICKE CLEIC 
; 2: COSUR 2590 

ı 450 GALL CLEAR 33 FRINT "JOYSTICK 
!. TASTE GELOEST?": ee 
' ET De B 

! 460 CALL 6! 

1 RZ 

L 

Lu 


en: ; 
20 ! 12783 (0 BY 

301. BR 

40 %* ® 
so'%* UWE FECHTER “ 

60 '%* %* 
701% JUERCEN FECHT ” 

80 ı * x 
90% 7965 OSTRNCH I # 

100 ı* “ 

110 !% HEILIGENBERDERSTR.6 * 

120 ı% “ 

130 RRRRKERRUKEN NK UHR EERKE 

140 ! 

150 ! VERWENDETE VARINBLEN 

160 ! 

170 ON BREAK NEXT 

180 GOTO 220 #3 2,Z1,V,W,Wi,V1,W3, 


Galaxy-Fight ein Spiel nach typischer 
Weltraummanier! 
Raumcommander Kirk schickt zwei seiner besten 
Besatzungsmitglieder in die unerforschten Weiten 
des Weltalls, mit dem Auftrag, feindliche Klingo- 
nenschiffe zu zerstören. 

Dabei hilft die”Feuertaste” des TI-99, die hier als 
Photonenkanone in Aktion tritt. 

Wir wünschen viel Spaß! 

PS. Eine genaue Anleitung zum Spiel wird gleich 


nach dem Laden des Programmes gegeben. 


WALUE 
„EIN,S 


„Tr TiyfyAlyn,E,Bi,0,D,E 
aRiyX2, YLyY2,EL,TR,TRL,TRZ 


LL SCREEN 5: 
GRLh 


CALL MOTIC| 
HCHAR 33 CALI. 


ss Chill SFRITE 5: 


Chit. 


TITEL4="BENOFTICENZSIH 


198,0 040,7,2,.1278,2, 1% 
SECHLTITELS 1, DI): 
7A OR EIN-106 THEN 350 ELSE {IF EI 
L HCHARCL2,L,32,32) 


2 


6,2,8,7 
TITEL 
4 OR EI 
HE 


8,2,8)°° FÜR 
) z: NEXT I 
96 THEN 350 E 
RC12,1,32,32) 5: GOT 


Imi 


To 


EIN 


KV re BAHT 
RAUM, ZW 


"DER SCHAUFL 


IHR Rauf- ": 


NE 


TGE! 


Det CH DEN "i 
NACH" 2: 
SEN DES EB 
FARALLEL 


EM": 
N": 


iFF NICHT GESC 
"es tDABOSFIEL BE 


HZEITIG": 


S nNGE 
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480 ! 
490.1 
500 ! = 
510 !- SFIRALNEREL 

520 ! 

530 CALL CHAR (34 ,"UCO23FAABRIF27A7479792F20 LAY0C0ZAU2H24 
C8F2847800887000") 

540 CALL CHAR(128," 000239 44821F2747479792929 14990034 
ACBF2847800887000") 

550 CALL CHAR(139 , "OLOZEPAABZLF27A74797929N5 La80n 
4C8F2847800887000") 

560 ! 

570 ! FLANETEN 

580 ! 

590 CALL. EHAR(AZ,"O3070CIVLFZFICID27ZZISLESFOFOZOGR 
CB9IBZOFOEOLOBOOO") 

600 ChLL CHARC66,"03070CL01FIFZEID27ZZIBIEH 
C89I8EZOFOEOLOBOOO") R 

610 CALL CHAR(72,"823574ANDEFCAEFAN) 

620 CALL CHARC7%,"AAPHIHLFZSESZFOR") 

630 ! 

640 ! KOMET 

650 ! 

660 CALL CHAR (7A, 000000400107 1F3F3BEOA0LOIGZGOOAODGGOZOCHUCHEIFEDE 
796C320904020120") 

670 ! 

680 ! ASTERDIDEN 

690 ! 

700 CALL CHAR (86,"0048303148002002") 

710 CALL CHAR(87," LO925ABBIBSAF2IO") 

720 ! 

730 ! RAUMSCHIFF 1 NACH ÜBEN 

740 ! 

750 CALL CHAR(51,"LOLDZEITFEF2LOZEB") 

760 ! 

770 ! RAUMSCHIFF 1 NACH RECHTS 

780 ! 

790 CALL CHARCAP,"3OLRICFFICLSZOOO") 

800 ! 

810 ! RAUMSCHIFF 1 NACH UNTEN 

820 ! 

830 CALL CHAR(50,"3BLOF2FEZCZBLOLO") 

840 ! 

850 ! RAUMSCHIFF 1 NACH I.INKS 

860 ! 

870 CALL CHARCAB,"OCIBZPFFZPLLOCHO") 

880 ! 

890 ! RAUMSCHIFF 1 NACH LINKS OBEN 

900 ! 

910 CALL CHAR(52,"8060703F1DLB1713") 

920 ! 

930 ! RAUMSCHIFF 1 NACH RECHTS OBEN 

940 ! 

950 CALL CHAR(53,"OLOGOEFCFRZBABOR") 

960 ! 

970 ! RAUMSCHIFF 1 NACH LINKS UNTEN 

980 ! 

990 CALL CHAR(54,"13L2ICAFZF7OSOBH") 

1000 ! 

1010 ! RAUMSCHIFF 1 NACH RECHTS UNTEN 

1020 ! 

1030 CALL CHAR(55,"CEAESBFEFCOEOSOL") 

1040 ! 

1050 ! EXFLOSION DER RAUNSCHIFFE 

1060 ! 

1070 CALL CHAR(136," 149 SCFERBIARL") 

1080 CALL CHAR(137,"549 234501428") 

1090 CALL CHNR(138,"88 OAALOGEL22") 

1100 ! 

1110 ! ScHUSS 

1120 ! 


ZEICHENDEF INITION E = 


1130 CALL CHAR(65,"G000241818240000") 
1140 ! 

1150 ! RAUMSCHIFF 2 NACH OBEN 

1160 ! 

1170 CALL. CHAR (59, "LBSLLBLESCTEDEFPF") 
1180 ! 

1190 RAUMSCHIFF 2 NACH RECHTS 

1200 ! 

1210 CALL CHAR(57,,"COSOSuFFFF32S0CH") 
1220} 

1230 ! RAUMSCHIFF 2 NACH UNTEN 

1240 I! ö 

1250 CALL CHAR(5B,"FPDETESCIBLBECHE") 
1260 ! 

1270 ! RAUMSCHIFF 2 NACH LINKS 
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1290 CALL CHARCEA," 

1300 ! 

1310 ! RAUMSCHIFF 

1320 | 

1330 CALL CHARC60,"8B060703F1D1B1713") 

1340 ! 

1350 ! RAUMSCHIFF 2 NACH RECHTS OBEN 

1380 ! 

1370 CALL CHAR(61,"OLGEOEFCFBESABCH") 

1380 ! 

1390 ! RAUMSCHIFF 2 NACH LINKS UNTEN 

1400 ! 

1410 CALL CHAR(62,"I3L2ICLFSF 30") 

1420 ! 

1430 ! RAUMSCHIFF 2 NACH RECHTS UNTEN 

1440 ! 

1450 CALL CHAR(63,"CBABZBFBFCOEVEOL") 

1460 ! 

1470 !HAUFTFROCRAHMN 

1480 ! 

1490 CALL CLEAR FOR Tri TO 14 :: CALL COLOR(I,2,D) 

1500 RANDOMIZE !# CALL SCREEN(2) 

1510 ! 

1520 ! ZEICHENDEFINITION 

1530 ! 

1540 Y$="020800000000009" 

1550 FOR 180 TO 85 

1560 FOR F=1 TO 16 :: I=INTCRNDRIS+L) 

1570 As=n$BSECK(Y$,J,1) Z3 NEXT F 

1580 IF A%="0000000000000000* THEN Ab="" :: GOTO i560 

1590 CALL. CHARCI,NSI EE Ab © NEXT I 

1600 ! 

1610 ! SETZEN DER ASTEROIDEN 

1620 ! 

1630 FOR I=1 TO 16:2 CALL. HCHARCRNDR2Z+L.RHDFELHL,EO) 33 CALL HCHA 
RERND#23+1 ,RND*3141,81) :: CALL HCHNRCRNERZZ+L, RNDFSL+L 8 

1640 CALL HCHARCRNDF23+1,RND#SI4L,B3) 52 CHLL HEHARCRNDE 

141,84) :: CALL HCHARCRND#23+L,RND*31+1,85) 3: CALL HEHARIRN 
‚RND*31+1,86) 

1650 NEXT I 

1660 FOR I=1 TO 2:2 CALL HCHARCRNDRZE+L,RNERBLHL,FOI ER CALL HEHARC 
RND*23+1 ,RND*3141,73) 1: CALL. HCHNRCRNDRZE+LRNDEEL+L,BTIEE NEXT I 
1670 ! 

1680 ! SETZEN DER FLANETEN, KOMETEN UND DER SFIRALNER 

1700 E=74 :: GOSUR 2840 COSUR 2810 :: COSUR 28V : 
128 :: COSUB 2810 :: E=139 :: E=48 :: GOEUE 2810 :: CÜBUM ZBIO 
E=66 :: GOSUR 2810 

1710 CALL COLOR1y4p1p434, 10,1, 19 p1Ay1yäyAairAy5rtn6,i2,in Fibre, 
13,1,5,6,1) 

1720 X1=(INTCRNDK2O) +2) #8 

1730 X2=(INTCRND#2O) +2) #8 

1740 Yi=(INT(RNDR2B) +2) *8 

1750 Y2=(INTCRNDHZBI+DI KB IE IrO 5 TRERNDXZ+AB ı: TRISRNDYTASS 
1760 CALL SPRITECHL,TR,AyXL,Y1,0,0,N2,TRL,8,X2, Y2,0,0) 

1770 CALL JOYST(1,V,W:: CALL JOYSTCZ,VE.WE) Si GALL KEY(L,O,AL 


2 CALL KEY(2,R,FUIEE THBSCWHNHBSCW) 1: TIHABELUEITABECHS) 
1780 IF Ti=0 OR T2=0 THEN CHLL DELSFRITECHL,N2 COTO 1780 Ei 
820 

1790 1,0,P:0 

1800 CALL JOYST(A,V,Wr: CALL KEY(L,A,OL 

1810 CALL JOYSTC2,V8,W3) 2: OALL KEY(2,F,Pi) 

1820 MeCärlaSauAWd /BEE 3: Nel2RÜSHBRÜUSHN/BHE i: IF M=Z THEN 192 
o 

1830 ON M GOTO_ 1900,1860,1910,1840,1920,1880,1860,1870,18#0 
1840 A: e coTD 120 

1850 A- " GOTO 1920 

1860 E 56 :: COTO 1920 

1870 A=-20:: E COTn 1920 

1880 15 f ‘GOTO 1920 

1890 dee GOTO 1920 

1900 n COTO 1920 

1910 As st 088 

1920 IF N=Zi THEN 2020 

1930 ON N COTO 2000,1980,2010,1940,2020,1950,1986,1970,1970 
1940 Als0:: B1=-20:: Zimöit DrS6r: COTO 2020 

1950 A : COTO 2020 

1960 

1970 

1980 

1990 f ı 

2000 : COTO 2020 

2010 : 

2020 CALL PATTERNCHLFC,H2,DI:: CALL MOTIONCHL, 2,n1,B4) 
2030 IF Q+1 OR F+i THEN 3080 

2040 GOTO 1800 
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2050 ı! 
2060 ! ECHUSS ABGEBEN Ui 
2070 ! 

2080 IF Q+1 AND F+l THEN CALL FOSITIONCHI,E,FyH2 
E(#3,42,14,E,F,6%N,6%6,44,.65,10,0,H,68hi sol 
2090 IF Q+l THEN CALi. FOSITIONCHLLE,FI:: CALL 9 
6*A,6*E) :: COTO 2130 ELSE CALL FOSITIONCH2,O,M) 
5,10,6,H,6*n1,6*B1) 

2100 CALL SOUND(40,-7,0) 

2110 CALL COINCCH4,HL,IO,TREI:: IF TRE THEN 3320 

2120 I=I+1:: IF 1<3 THEN 2100 ELSE CALL DELSFRITEIHA):: COTO 1790 
2130 CALL SOUND(40,-6,0) 

2140 CALL COINC(H3,#2,10,T1RA):: IF FRA THEN 2250 

2150 I=1+1:; IF 1<3 THEN 2130 ELSE CALL DELSPRITE(HBI:E GOTO 1720 
2160 CALL SOUND(50,-8,0) 
2170 CALL. COINCCH3,H4,8,TRA; j 
2180 CALL COINCCH2,3,10,TRl):: CALL COINEIHA,HL.IO,TRBIE: IF TRL 
OR TR OR TR2 THEN 2200 

2190 I=I+1:: IF 12 THEN 2170 ELSE CALL. DELSPRITEHZ,HA):: COTO 17 
90 

2200 IF_TR=O THEN 2240 ELSE CALL MOTTONCHBL-ERN.-SER) IE CHLL BATTE 
RN(#4,32,#3,32) 2: CALL DELSPRITE(HA) 

2210 FOR Isi TO 10 :: NEX 

2220 CALL FATTERN(H3,138) 32 CALL MOTIONCHZ,0,0 
6,0):: FOR Is1 TO 50 :: NEXT I 

2230 CALL DELSPRITECH3) 22 C5TO 1790 

2240. IF TR1 AND TR2 THEN 2486 ELSE IF TRL THEN 2280 ELSE 2320 
2250 ! 

2260 ! SIEGER RAUMSCHIFF i 

2270 ! 

2280 SI=49 :: CALL MOTIONCH2,5,0) 1: A3=2 2: COTG 2330 

2290 ! 

2300 ! SIEGER RAUMSCHIFF 2 

2310 ! 

2320 SI=56:: CALL MOTIONCHL.5,O):: Adi 

2330 CALL DELSPRITE(HS,HA):: FOR I=136 TO 138 

2340 J1=J1+l :: CALL SOUND(-600,-8+J1,0) 

2350 CALL PATTERNCHNS,T) 

2360 FOR J=1 TOD 60 :: NEXT I 

2370 NEXT I 

2380 FOR I=1 TOD 700:: NEXT I 


"RUEFEN 


2 GALL SOUND(309,- 


2370 CALL CLEAR :3 CALL DELSFRITECALL) 3 CALL SCREEN(LS) 
2400 DISFLAY AT(10,2): "pilot mit "ECHRAED "int oieger }" 
2410 GOSUR 2620 :; DISPLAY AT(13,5): "noch ein spiel" 
2420 NCCEFT ATC13,21) VHLIDATEC"NNäI") STZEL-L 
2430 IF Ya" OR Yamtj" THEN RUN 1490 

2440 END 

2450 ! 

2460 ! KEIN SIEGER 
2470 

2480 CALL DELSFRITECHS, CHLL MOTIONCHL,S,O.H 
2490 FOR 1=136 TO 138 :: NEXT I 

2500 Ji=Ji+l :5 CALL SOUNDC-E00,-8+J1,0) 

2510 CALL PATTERNCHL,I,HQ,D 

2520 FOR J=1 TO 60 :: NEXT J 

2530 NEXT I ; 
2540 FOR I=1 T0 700 :: NEXT I 
2550 CALL CLEAR tt CALL DEL 
2560 DISFLAY AT(B,2): "h 
2570 DISFLAY AT(10,139: 
2580 GOTO 2410 

2590 DISPLAY AT(24,26): 
2600 CALL. KEY(O,EIN,ST) 
2610 IF ST=0 THEN 2600 ELSE RETURN 
2620 CALL. SOUND(150,349,5) 

2630 CALL SOUND(150,449,5) 

2640 CALL SOUND(150,523,5) 
2650 CALL SOUND(150,659..5> 

2660 CALI. SOUND(300,494,5,784,8) 

2670 CALL SOUND(150,659,5) 

2680 CALL. SOUND(150,494,5,698,5,784,5) 

2690 CALL SDUND(145,494,E,698,8,784,5) 

2700 CALL SOUND(150,659,30) 

2710 CALL SOUND(150,459,5) 

2720 CALL SOUND(145,466,5,659,5,784,5) 

2730 CALL SOUND(145,466,5,.659,58,784,5) 

2740 CALL SOUND(150,659,30) 

2750 CALL. SDUND(150,659,5 

2760 CALL SQUND(295,494,5,698,8,784,5) 

2770 CALL. SOUND(145,370,0,523,0,622,0) 

2780 CALL SOUND(295,349,0,494,0,587,0) 

2790 CALL. SOUND(800,330,0,392,0,523,0) 

2800 RETURN 

2810 F=INT(RNDK22I+1 35 GHINTCRNDKZO) +1 

2820 CALL HCHAR(F,G,E):: CÄLL HCHARCF+i,O,E+l 3: CHLL HEHAR(F,G+L, 
E+2) 2:3.CALL HCHAR(F+1,G+1,E+3):: RETURN 

v 


CALL SC 
‚ide piloten vorloren it 
leben !" 


un 
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Textverarbeitung 


für SHARP MZ 700 


Das Programm ist nicht als Konkurrenz zu professionellen Textver- 
arbeitungssystemen gedacht, es stellt jedoch für private Anwendun- 
gen durchaus eine leistungsfähige Alternative dar. Weil es bis auf 
die Umbelegung der Tastatur keine Maschinenbefehle enthält, 
sollte es auch in andere Basicdialekte übertragbar sein. 


Diese Version arbeitet mit dem Basic- 
Interpreter 12-013 Ul.0A und enthält 
folgende Unterprogramme: : 
l. Formatierung 
2. Schreiben und Bildschirmausgabe 
3. Bildschirmausgabe und. Neustruk- 
turierung 
3.1 Bildschirmausgabe mit Korrektur 
3.2 Automatischer,Zeilenümbruch , 
3.3 Löschen von Zeilen Ü 
3.4 Verschieben von Zeilen 
4. Speichern auf Kassette 
5. Lesen von Kassette 
. 6. Drucken 
7. Routineworte 
8. Tabulator setzen (links-oderrechts- 
bündig) 
9. Autoreverse 
10. Aussteigen 


Im Unterprogramm 2 stehen außerdem 
die Funktionen Repeat und Einmitten 
(z.B. von Überschriften) zur Verfü- 
gung. 

In den Programmteilen 2 und 3.1 be- 
steht eine Editiermöglichkeit der 
letzten Zeile mit den Funktionen Lö- 
schen, Einfügen und Korrigieren von 
Einzelzeichen. 

Für Unterstreichungen wird jeweils 
eine Extrazeile benötigt. 

Aufgrund der nicht genormten Steuer- 
zeichen sind Unterstreichungen mit ei- 
nem angeschlossenen Drucker nicht 
ohne weiteres möglich. 

Beim Start des Programmes wird die 
Tastatur so umbelegt, daß sie in der nor- 
malen deutschen Schreibmaschinenta- 
statur mit Kleinschreibung entspricht. 
Die dabei überzähligen Tasten rechts 
außen stehen für die direkt erreichba- 
ren Sonderfunktionen zur Verfügung: 
“N’= Rücksprung in die Programm- 
wahl 

“= Linkstabulator (nur aus Pro- 
gramm 2) 

“7’= Korrektur (Das eigentliche Frage- 
zeichen liegt jetzt ja über dem “B”) 
“y= Rechtstabulator (nur aus Pro- 
gramm 2) : 

“£”= Einmitten (nur aus Programm 
2) 

“”= Repeat (Dauerfunktion der 
letzten Taste) (nur aus Programm 2) 


Wenn man das Programm über 10 ver- 
läßt, erhält man wieder die Tastaturbe- 
legung des Basics. 

‘Der Grund, daß anstelle der komforta- 
blen Inputanweisung für alle Schreib- 
funktionen Unterprogramme mit 
“Get” benutzt werden, liegt darin, daß 
der Basic-Interpreter bei “Input” keine 
Kommata verarbeitet. , 

Die benutzten Grafikzeichen werden 
im Listing durch farbig abgehobene 
ASCII Kodezahlen dargestellt. 

Die einzelnen Programmteile erklären 
sich beim Ablauf weitgehend selbst 
und sind gegen Bedienungsfehler ge- 
schützt. Daher sind hier nur einige er- 
gänzende Hinweise nötig: 


Zu 1. Im Rahmen des verfügbaren 
Speicherplatzes. der etwa für 4-5 eng- 
beschriebene DIN A4 Seiten ausreicht. 
kann das Programm 20 Seiten mit je 70 
Zeilen und 78 Zeichen pro Zeile gleich- 
zeitig bearbeiten. 

Ein Warnton ertönt 8 Zeichen vor Zei- 
lenende und 5 Zeilen vor Ende der 
Seite. 


Zu 2. Das Schreiben mit dem Pro- 
gramm entspricht dem Tippen auf ei- 
ner normalen elektrischen Schreibma- 
schine. 

Soll an einerschon beschriebenen Seite 
weitergeschrieben werden, zeigt das 
Unterprogramm 2 bei jeder Betätigung 
der CR-Taste eine der beschriebenen 
Zeilen, beginnend mit Zeile 1. 

In der Korrekturfunktion wird ein 
Cursor abgebildet, der durch die Tasten 
4 +beweglich ist. Über die Tasteyist es 
möglich. den Cursor entlang seiner 
letzten Richtung in Dauerfunktion zu 
bewegen und zu stoppen. 

Durch INST und DEL können Einzel- 
zeichen eingefügt bzw. gelöscht wer- 
den: Die Korrektur erfolgt durch Ein- 
tippen des neuen Zeichens. Man kann 
im Korrekturmodus auch in den linken 
Rand gelangen. 

Beendet wird das Korrekturprogramm 
automatisch bei Erreichen des’bisheri- 
gen Zeilenendes oder durch ein er- 
neutes Betätigen der Korrekturtaste. 
In den Sonderfunktionen Rechtstabu- 


lator und Einmitten zeigt ein Zeichen 
am rechten Bildschirmrand an. daß die 
Eingabe eines Textes erwartet wird. die 
mit CR abgeschlossen werden muß. 
Der eingegebene Text kann mit der 
Korrekturtaste editiert werden. 


Zu 3. Zum Einfügen von Zeilen isteser- 
forderlich. zunächst auf einer freien 
Seite zu schreiben und die Zeilen dann 
mit dem Unterprogramm 3.4. an die ge- 
wünschte Stelle zu bringen. 


Zu 3.1. Eine Unterbrechung der Bild- 
schirmausgabe kann durch Betätigung 
der CR-Taste erfolgen. Die jeweils 
letzte Zeile kann wie in 2. weiterge- 
schrieben werden. 

Wird die Ausgabe danach mit der Taste 
#% wieder gestartet. laufen die folgenden 
Zeilen rückwärts weiter. 


Zu 3.2. Dieses Unterprogramm ver- 
schiebt pro Durchlauf maximal die 
Zeilenzahl einer Seite. Es können da- 
her manchmal mehrere Gänge not- 
wendig sein. Achtung, Zeilen die über 
Seite 20 hinausgeschoben werden ge- 
hen verloren. 


Zu 3.3. Beim Löschen von mehreren 
Zeilen aufeiner Seite sollte man immer 
bei den höchsten Zeilennummern 
beginnen. 


Zu 3.4. Das Programm bearbeitet Ver- 
schiebeanweisungen nur. wenn auf der 
Empfängerseite eine entsprechende 
Zahl von Leerzeilen am Ende frei ist. 
Aus diesem Grund kann man in- 
nerhalb einer Seite auch nur zu höhe- 
ren Zeilennummern verschieben und 
sollte beachten. daß. nach dem Ver- 
schieben aufder Spenderseite dienach- 
folgenden Zeilennummern aufrücken. 


Zu 4. Obwohl das Programm gegen ei- 
nen Zusammenbruch durch Fehlbe- 
dienung weitgehend geschützt ist, sollte 
man fertige Seiten sicherheitshalber 
immer sofort auf Kassette aufzeich- 
nen. 
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18 MODE TN 
28 FOR 1=4653 T04676 :REM SCHREIBMASCHIN 
ENTASTATUR 

38 P=PEEKC1):Q=PEEKCI+64) 

48 POKEI,Q:POKEL1+64),P 

58 NEXTI 

62 DATAA645, 162,479, 99, 4646, 189,4710,89 
»4647,173,4711,178,4642, 186, 4706, 168,464 
3,187, 4707, 185, 4755, 59,4756, 58, 4687, 174 
4751,63,4686,39, 4750, 147, 4744,43,4747,47 
‚4753, 61,4788,45,4764, 215, 4699, 36, 4763, 3 
6,4749, 92,4712,91,4713,93 


?8 FOR I=1 TO 26 
88 READ P,W:POKE P,W:NEXT I 
938 PRINT"B 


182 DIM S$C78,28):DIM LICIB):DIM RECIBI: 

IF 2562:25=7@:REM GRUNDEINSTELLUNG 

118 IF 22<2:22=49 

128 IF LR<B:LR=8 

138 IF ARSZ:AR=41 

148 PRINT"K%XSCHREIBMASCHINE MIT M2-798% 

KRAKKKKKK" 

158 PRINT" KXKCOPYRIGHT BY KRRRKKKKKIHKKKK 

KRRRRRKKK" 

168 PRINT"XXXROLF KAPPLERKKRERRERKKKKK 

KKRKKKKEK" 

178 PRINT"XX*X2088 PINNEBERGKKKKRKKKKKKRK 

KARKKKKKK" 

188 PRINT"XKXIM STOOK 1BKRCRRRÄKKKIK 

KARKKRRKK" 

198 -PRINT :PRINT " XXXPROGRAMMWAHLKKKKKKKKK 

KRRRRRRRRRRRRRRK" 

288 PRINT"DER FREIE SPEICHERPLATZ BETRAE 

GT ";SIZE5" BYTESD" 

218 PRINT" 1 :FORMATIEREN" 

220 PRINT"2:SCHREIBEN UND BILDSCHIRMAUSG 

ABE" 

238 PRINT"3:BILDSCHIRMAUSGABE UND NEU- 
STRUKTUR IERUNG 

248 PRINT"4:SPEICHERN AUF CASSETTE" 

258 PRINT"S:LESEN VON CASSETTE" 

268 PRINT"6:DRUCKEN" 

278 PRINT"? :ROUTINEWORTE" 

288 PRINT"8:TABULATOR SETZEN" 


298 PRINT"9:AUTDREVERSE" 

388 PRINT" IQ:AUSSTEIGEN" :PRINT 
318 ON ERROR GOTO 3818 

328 INPUT "BITTE EINE ZAHL EINGEBEN "MW 
338 ON ERROR GDTO 8 

348 ON MW GOTO 359,918, 1488, 2288, 2388, 25 
938, 2758, 449,840,2718 

350 PRINT"@": PRINT"SIE SIND IM UNTERPRO 
GRAMM *XXFORMAT TERLINGKKK" : 
PRINT 

368 PRINT"GEBEN SIE JEWEILS DIE VON IHNE 
N GEWUENSCHTEN ZAHLEN EIN" :PRINT 
378 DN ERROR GOTO 3818 . 

388 INPUT "LEERZEICHEN FUER LINKEN RAND: 
";LR 

398 INPUT"ZEICHEN PRO ZEILE:";22 

488 INPUT"ZEILEN PRO SEITE:" 53N:GOSUB3848 
"RS=N 

418 ON ERROR GOTO 8 

428 IF LR+22>48:PRINT"MAXIMAL 49 ZEICHEN 
PRO ZEILE2" :G0T0379 

438 GOTOIQ 

448 RECBI=SLR+2Z:I=1:REM TAB, 

:PRINT"SIE SIND- IM UNTERPROG 
KXXTABULATORKKK" :PRIN 


468 PRINT"WAEHLEN SIE :LINKSTABULATOR=L 
"RECHTSTABULATOR=R 


478 INPUT x$ 
488 IF %$="L" GOTO 518 
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Zu 5. Achtung, dieses Programm kann 
man ohne Abbruch nur wieder verlas- 
sen. wenn man auch eine bespielte Kas- 
sette vorliegen hat. Außerdem liefert es 
nach jedem Komma automatisch ein 
Leerzeichen. 


Zu 6. Das Programm ist für einen 80- 
Zeichen-Betrieb des angeschlossenen 
Druckers ausgelegt. Wenn man den 
eingebauten Drucker mit normaler 
Schriftgröße benutzen will, muß die 
Programmzeile 10 gelöscht werden. 


Zu 7. Häufiggebrauchte Texte von maxi- 
mal je 15 Zeichen können mit den 
blauen Funktionstasten 1-10 abgerufen 
werden. 


Zu 9. Eine Autorevers-Vereinbarung be- 
wirkt, daß nach Erreichen der verein- 
barten Stelle einer Zeile beim Tippen 
eines Leerzeichens oder eines Binde- 
striches automatisch die nächste Zeile 
begonnen wird. Der Trennungsstrich 
erscheint dabei zunächst nicht, ist aber 
am Zeilenende gespeichert. 


498 IF X$="R":GOTO 638 

582 GOTO 98 

518 PRINT:PRINT"GEBEN SIE DIE ZAHL DER G 
EWUENSCHTEN .LEERSCHRITTE VOM LINKEN RAND 
EIN" 

528 PRINT"BEENDEN SIE-DIE EINGABE DURCH’ 
DE: ES STEHEN MAXIMAL 18 TABULATOR 


STELLEN ZUR VERFUEGUNG“ 

538 PRINT"SIE HABEN DAS PROGRAMM BEIM. "; 
L;"TEN ZEICHEN VERLASSEN" 

548 ON ERROR GOTO 3818 

558 PRINT"ALTER TABULATOR ";LICH) 

568 INPUT LICH) 

578 ON ERROR G0TO 8 

588 IF LICII=B:FOR I=1TO18:LICII=Q:NEXTI 
:GOTO 98 

598 IF LICIIKSLICI-1):PRINT"UNLOGISCHE E 
INGABE" :60TO 548 

698 IF 22<=LICT):PRINT"UNLOGISCHE EINGAB 
E":6070 548 

618 I=I+1:IF 1<=18:6070548 

628 GOTO 98 x 

630 PRINT"GEBEN SIE DIE ANZAHL DER GEWUE 
NSCHTEN LEERSCHRITTE BIS 2UM RECHTEN R 
AND EIN" 

648 PRINT"BEENDEN SIE -DIE EINGABE DURCH 

062 ES STEHEN MAXIMAL 19 TABULATOR 
STELLEN ZUR VERFUEGLNG" 

658 PRINT"SIE HABEN DAS PROGRAMM BEIM "; 
L5"TEN ZEICHEN VERLASSEN" 

668 ON ERROR GOTO 3818 

678 PRINT“ALTER TABULATOR ";RECI) 

688 INPUT RECII 

698 ON ERROR GOTO @ 

788 IF RECII=@:FOR I=1TO18:RECII=B:NEXTI 


:G0TO 98 


718 IF RECII>=RECI-1) :PRINT"UNLOGISCHE E 
INGABE" :G0T0668 

720 IF RECI)>=22:PRINT"UNLOGISCHE EINGAB 
E" :GOT0668 
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738 I=I+1:IF I<=18 GOTO 668 

248 GOTO 98 

758 GOSUB 1298 :REM EINMITTEN 

768 GOSUB 3118 

778 M$=S$CJ,STJ+N$ 

?88 AM=22/2-LLENCLM$I-LRI72 

>38 I=8 

882 IF I>=AM:GOTO838 

81a Ms=" "+mg 

828 1=1+1:G0T70 888 

838 S$LJ,STI=MS:L=LENCSSCY,STII-1:G0T01 

98 

8428 PRINT"ÜSIE SIND IM UNTERPROGRAMM 
KKKALITOREVERSEXKK" SPRINT 

358 PRINT"GEBEN SIE EIN WIEVIEL ZEICHEN 

von RECHTEN RAND AN DER AUTOREVERS 

EBETRIEB EINSETZEN SOLL" 

868 ON ERROR GOTO 3818 

878 INPUT R 

888 ON ERROR GOTO 8 

898 AR=LR+2Z-R 

3e2 GOTOSA 

3918 PRINT"@":REM UP 2 

928 ON ERROR GOTO 3818 

932 INPUT"WELCHE SEITE?" 5ST:PRINT"@" 

-348 GOSUB 3878 

958 ON ERROR G0TO 8 

968 FOR J=ı TO 25 "REM ZEILEN 

978 R=8:LT=0:RT=B:PRINT 

9388 IF S$LJ,STJ="":GOTO 1928 

398 IF LENLS$CY,STIII3I:PRINTSSCY,STIH"N 

0" :60T01818 

1888 PRINT S$CJ,STJ;"4an" 

1818 L=LENCS$CJ,ST)):GOTO 1939 

1828 GOSUB 1298 :PRINTTABCLRI 5":.amM" :L=LR 

1838 IF L=22+LR-8:MUSIC"FI" REM ZEICHEN 

1848 GET As 

1858 IF L<=AR GOTO 1888 

1868 IF As=" " GOTO 1238 

1878 IF As="-":5$(J,STJ=S$LJ,STI+AS:GOTO 

1238 

1888 IF As="" :IF R=8:G0T0 1048 

1898 IF ASCCA$I=13:G0701238 

1188 IF As="\":G0T0 98 

1118 IF [" :LT=LT+1:G0TO 2849 

1128 IF RT+1:GDTO 2888 

1138 IF 0TO >58 

1148 IF GOSUB 1328 

1158 IF :IF R=B:R=1:G0T0 1178 

1168 IF :IF R=1:R=8:60T0 1848 

1178 IF R=1 :A$=RIGHTSCSSCU,STI,N) 

1188 IF L<LR+ZZ:IF ASCCA$II3D:S$LJ,STI=S 

$Cy,ST)+As 2 

1198 IF SIZE<198:PRINT"ABBRUCH WEGEN GEF 

AHR DER SPEICHERUEBER- SCHREITUNG" :GOTO 

1268 

1208 IF LENLSSCY,STIJI3I:PRINTSSCY,STI" 

BB" :G0T01228° 

1212 PRINT S$CU,STJ5":. am" 

1228 L=L+1:G0T01838 

1238 IF J=2S-5:MUSIC"A1" "A" 

1248 IF J=2S-5:MUSIC"A1" zra" 


1258 NEXTJ 

1268 PRINT"@MSIE HABEN JETZT NOCH ";SIZE 
3" BYTES FREIEN SPEICHER DRUECKEN 
SIE EINE TASTEg" 

1278 GET As: IF As="":G0T0 1278 

1288 GOTOSB 

1298 S$CJ,ST)="":1=B:REM LINKER RAND 
1388 IF I>=LR:RETURN 

1318 S$LJ,STI=S$LJ,STI+" ":1=1+1:G0T0138 
8a 

1328 A=1 :REM KORREKTUR 

1338 GET A$ 
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1348 IF As="@":IF RK=B:RK=1:G0T0 1398 
1358 IF As="B":IF RK=1:RK=8 
1368 IF As="B 1:IF P>@:A=A+1 


1378 IF As="B -1:2IF Al :AsA-1 


1388 IF As="$" :Ag="":L=L-1 :RETURN 

1398 IF RK=1:IF P>Q:IF Ay :A=A+c 

1488 P=LENCS$LJ,STJJ-A 

1418 IF ASCCASI=24:IF PAACZZ+LR:S$CY,ST) 
=LEFT$CSSCY,STI,P+TI+" "+RIGHT$LSS$CJ,ST) 
sA-1):L=L+1:60T01448 

1420 IF ASCCASI=I6:IF PIB:S$LJ,STI=LEFTS 
[S$LJ,STI,PI+RIGHTSCSSLY,STI,A-1) PRINT" 


an" :L=L-1:G0T01448 . 

1438 IF ASCLAFIIIB:SHLY,STISLEFTSCSSLY,S 

TI,PI+AS+RIGHTSCHSCYH,STI,A-1) :A=A-1:IF A 

<1EA$=""L=L-1 :RETURN 

1448 IF LENCSS$CY,STIII3I:PRINTSSCY,STI 5" 

Al" :GOTO1468 

145@ PRINT S$CJ,STJ;", Bm" 

1468 IF P<=38 PRINT TABCPI "9" ;"M" :GOTO 

1338 . 

1478 PRINTTABCP-39) ;"BA>OMN" :GOTO 1338 

1488 PRINT"ASIE BEFINDEN SICH IM UNTERPR 

DGRAMM XXKBILDSCHIRMAUSGABE UND 
„NEUSTRUKTURTERUNGKKKA" 

1498 PRINT" 1=BILDSCHIRMAUSGABE UND KORRE 

KTUR" 

1588 PRINT"2=AUTOMATISCHER ZEILENUMBRUCH 

1518 PRINT"3=LOESCHEN VON ZEILEN" 

1528 PRINT"4=VERSCHIEBEN VON ZEILEN" 

1538 PRINT"S=ZURUECK INS HAUPTPROGRANNM" 

1548 PRINT"OBITTE WAEHLEN SIE EINE ZAHL" 

1558 ON ERROR GOT03818 

1568 INPUT MW 

1578 ON ERROR GOTO 8 

1588 ON MW GOTOQ 1598, 1858, 2848, 2118,98 

1598 PRINT"R" :REM UP.3.1, 

1688 ON: ERROR GOTO 3818 

1618 INPUT"WELCHE SEITE?" ;ST:GOSUB 3078 

1628 INPUT"AB ZEILE: ";N:GOSUB 3948 

1638 ON ERROR GDTO 8 

1648 E=25:5=] 

1658 FOR J=N TO E STEP S 5 

1668 PRINT"OSEITE ";ST;" ZEILE "ju 

1678 PRINTS$CY,ST) 

1688 FOR I=ı TO 58 

1698 GETA$ 

1788 IF ASCCA$I=13:G0T01748 

1718 IF A$="\":G0T01488 

1728 NEXT 1,J 

1738 GOTO 1688 

1748 GET A$:IF As="":G0T0 1749 


1758 IF SIZE<188:PRINT"ABBRUCH WEGEN GEF 
AHR DER SPEICHERUEBER- SCHREITUNG" :60TO 
1268 ü 


1760 IF 1>LENCS$CY,ST)):GOSUB 1298 


1778 IF As="$" :G0SUB 1320:60T0 1748 

1788 IF As="\":G0T0 1488 

1798 IF ASCCA$I=18:S=-1:E=1:N=J:G0TO 165 
8 

1800 IF ASCCA$I<IB:S=1 :E=2S:N=J:G0T01658 
1818 IF LENCSSTI,STIIQSLRHER:S$CY,STI=S$ 
(J,STI+AS 

1828 IF LENCSSCY,STIII3I:PRINTSSCY,STI 5" 
BR" :GOTO1849 

1838 PRINT S$CJ,ST);"C4an" 

1848 GOTO 1748 

1858 PRINT"B":REM UP, 3,2 

1868 ON ERROR GOTO 3818 

1878 INPUT"WIEVUIEL ZEILEN SOLLEN DIE SEI 
TEN HABEN? " ;N:GOSUB3948 

1888 ON ERROR GOTO 8 
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1898 PRINT"BITTE WARTEN" 

1988 ST=1:FOR J=1 TO 2S:S$(J,B)="" :NEXTY 
1918 LX=2S:L2=2S:G0SUB 1978: IF ST<19:ST= 
ST+1:G0T0 1918 

1928 ST=8 

1939 LX=2S:L2=2S :60SUB 1978:IF ST<19:ST= 
ST+1:G0T0 1938 j 
1948 FOR J=1 TO 25:S$LJ,ST+1J=S$CJ,STJ:S 
*CJ,STJ="" :NEXTJ 

1958 IF ST>2:ST=ST-1:60701948 

1968 GOTO 1488 

1978 IF S$tL2,STJ="":IF L2>8:L2=L2-1:G0T 
01978 

1988 IF S$CLX,ST+1J="":]F LX>B:LX=LX-1:6 
HT01988 

1998 VE=N-L2:IF V2<=B:RETURN 

2888 IF L2>LX:U2=LX:IF V2<=B:RETURN 

2818 FOR J=1 TO VR:SFLLZ+HJ,STISSELY,ST+] 
I NEXT J 

2828 FOR J=U2+1 TO 8S:S$LY-U2,ST+1J=S$CyJ 
»ST+1) :NEXTyY 

2838 FOR J=2S-u2 TO 8S:S$LJ,ST+1J="":NEX 
TJ RETURN 

2848 PRINT"R":REM UP.3.3, 

2858 ON ERROR GOTO 3818 

2868 INPUT"AUF WELCHER SEITE SOLL GELOES 
CHT WERDEN?" 5ST :GOSUB 3078 :SA=ST 

2878 INPUT "WELCHE IST DIE ERSTE ZU LOES 
-CHENDE ZEILE? ";N:GOSUB 3849 :2A=N 
2888 INPUT "WELCHE. IST DIE LETZTE ZU LoE 
SCHENDE ZEILE?" 5N:GOSLUB 3948 

2898 ON ERROR G0T0 8 

2188 2E=N:SB=9:2B=1] :N=2E-2N:G0T02238 
2118 PRINT"BDAS VERSCHIEBEN SOLL ERFOLGE 
N: ":REM UP.3.4. 


2128 ON ERROR GOTO 3818 

2138 INPUT"VON SEITE ";ST:GOSUB 3979 :SA= 
ST 

2148 INPUT"AB ZEILE ";N:GOSUB 3949 :2A=N 
2158 INPUT"BIS ZEILE ";N:GOSUB 3849:ZE=N 
2160 INPUT"NACH SEITE ";ST:GOSUB 3978:5B 
=ST 

2178 INPUT"AB ZEILE ";N:GOSUB 3849 :2B=N 
2188 ON ERROR GOTO 8 

2198 N=2E-2ZA 

2282 FOR J=2S-N TO 25 

2218 IF S$(J,SBJ<>"" :PRINT"MAXIMALE ZEIL 


ENZAHL AUF SEITE "3SB;"UEBERSCHRITTENG": 
60702128 

2228 NEXT J 

2238 FOR J=2S-N TO ZB+1 STEP-1:S$LJ+N,SB 
I=5$(J-1,SBJ:NEXT J 

2248 FÜR J=2A TO .2E:S$(2B, SBJ=S$tJ, SA) :2 
B=&B+1 :NEXT U } 
2258 FOR J=2E+1 TO 8S:S$LY-N-1,SA)=S$Cy, 
SAI:NEXT J 

2268 FOR J=2S-N TO 2S:S$[J,SAJ="" NEXT J 
2272 GOTO 1488 

2288 PRINT"ÜSIE BEFINDEN SICH IM UNTERPR 
DGRAMM %%X SPEICHERN AUF CASSETTEXK 
xD" 
2298 
2388 
2312 
2328 
2338 
2348 
2358 


ON ERROR GOTO 3818 

INPUT"WELCHE SEITE? ";ST:GOSUB 3978 
ON ERROR GDTO 8 

PRINT"BL RECORD/PLAY" 

WOPEN”"SEITE" 

PRINT/T ST,2S 

PRINT"SEITE"3ST5" WIRD MIT"52S;" zE 
ILEN GESCHRIEBEN" 

2368 FOR J=1 TO 8S:S$LJ,STI="K"+SELJ,ST) 
:PRINT/T S$CJ,ST):GOSUB 2559:NEXT J 

2378 CLOSE:GCTO 98 

2382 PRINT"OSIE BEFINDEN SICH IM UNTERPR 


DGRAMM XXXLESEN VON CASSETTEXKKB" 
2398 INPUT"HABEN SIE EINE BESPIELTE CAss 
ETTE? YA=J ";x$ 3 
2488 IF X$2"J":G0T0 38 

2418 PRINT"L PLar" 

2428 ROPEN"SEITE" 

2438 INPLT/T ST,2S 

2448 PRINT"ES LIEGT SEITE" 5ST5" MIT";2S; 
" ZEILEN- VOR" 

2458 INPUT"SOLL DIESE SEITE GELESEN WERD 
EN? JA=y "3x8 

2480 IF X$<>"J".:CLOSE:GOTO 98 

2478 FOR J=1 TO 25 


2488 IF SIZE<3QA:CLOSE :GOTO 2520: * 

2498 INPUT/T S$CJ,ST) 

2588 IF LEFTSCSSCU,STI,LIIO "x" 2S$Cy-1,5T 
I=S$LJ-1,STJ+", "+S$CJ, ST) 2y=J-1 

2518 NEXT J 

2528 FOR J=1 TO 2$:G0SUB 2558 

2538 NEXTY 

2548 CLOSE:G0TO 98 


255® K=LEN(S$CY,STIJ:REM PLATZHALTER RAN 
D : 

2568 IF K)=1:K=K-1 

2578 S$CJ,STISRIGHTSCSECY,STI,K) 

2588 RETURN : 

25938 PRINT"RSIE BEFINDEN SICH IM UNTERPR 
DGRAMM - KRKDRLICKENKKK" 


2622 ON ERROR GOTO 3918 

2612 INPUT"WELCHE SEITE? "3ST 

2628 GOSUB 3978 

2638 INPUT"WIEUIELE ZEILEN SOLLEN GEDRUC 
KT WERDEN? ";N 

2648 GOSUB 3948 

2858 ON ERROR GOTO 8 

2568 PAGE N 

2678 FÜR J=1 TON 

2588 PRINT/P S$(y,ST) 

2698 NEXT J 


2788 GOTO 98 
2718 FOR 1=4653 T04676:P=PEEKCI)J:Q=PEEKC 
1+64) :POKE ,Q:POKEC 1464), P :NEXTI 

2728 DATA4645, 89, 4709, 189, 4646, 98, 4719, 
62, 4847,64, 4711,147,4642, 59, 4786,43, 4643 
"38; 4707,42, 4755,68, 4756, 62, 4687, 45,475\ 
„51.4686, 94.4758, 148, 4744, 36, 4747, 39,425 
3» 255, 4700,.47,4764, 95, 4699, 63, 4763, 198,4 
?49,192,4712,198,4713,128 


2738 FOR 1=1 TO 26:READ P,W:POKE P,W:NEX 
1a 


2749 END 
2750 PRINT"BSIE BEFINDEN SICH IM UNTERPR 
OGRANM *X*ROLIT INEWORTEXKKUN 


2768 PRINT"GEBEN SIE WOERTER VON MAXIMAL 
15 ZEICHEN EIN. SIE VERLASSEN DIESES UN 

TERPROGRAMM DURCH EINGABE DER TASTENNR. 7 

gen, 

27?8 ON ERROR GDTO 3818 

2788 INPUT "WELCHE TASTE WOLLEN SIE BELE 

GEN? ";MWSIF MWO:IF NW<=19:G0T02888 

2798 ON ERROR GOTO 8:60T098 

2888 ON ERROR GOTO 3 

?81A INPUT "GEBEN SIE JETZT IHR WORT EIN 

g . "3%$ 

2828 DEF KEY (MWI=X$ 

2838 GUTU 2758 

2848 IF LT>1B GOTO 1848:REM LINKSTAB 

285@ IF LENCSSCY,STIISSLICLT) SLT=LT+1:6D 

707848 

2508 FOR i=1 TO Ic 

JsSTI=5$Cy,STI+" mil 

2878 GOTO 1848 

2588 IF RT>12 GOT01948 :REM RECHTSTAB 

2898 IF RECRTIPLR+ZZ-L :RT=RT+1 :G0TO 2888 


TI-LENCSSCY,STIJ:SEL 
=L+1 NEXT I 


‘ 
0 
‘. 
) 
’ 
[) 
‘ 
) 
® 
{) 
‘ 
‘ 
‘ 
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2388 IF RECRT)J=8:G0T018482 

2318 Hs=5$(J,ST) 

23928 GDSUEII12 

2938 M$=5$(3,STI+N$ 

2948 MS=RICHTSCHS, CLENIMSI-LENCHEIII 

2358 AB=LR+2ZZ-LENCH$I-LENLMSI-RECRT) :RE 

"M ABSTAND 

2362 IF AB<I:RT=RT+:G0TO1%842 

2378 FÜR I=1 TO MB:H$=H$+" "NEXT I 

2388 S$(J,ST)=Hs+M$ 

2598 L=LENCS$CY,ST)J)J-] 

3282 GOTO 1288 

3213 PRINT"FORMALER EINGABEFEHLERL" 

3224 PRINT"EINGABE WIEDERHOLEN!" 

3438 UME 

3848 IF N >=1: IF N$=2S:RETURN 
PRINT"ES GIBT NUR DIE ZEILEN 1-78% 

VEREINBART SIND "52S;"ZEILEN" 

INPHT"EINGABE WIEUERKOLEN "5N:GOTO3 


TRAPPER 


für den ZX-81 


Zum vorliegenden spannenden Programm schickt uns der 
Autor folgenden Brief: 

Ich habe für den ZX-81 ein Spiel geschrieben, das auf mei- 
nem Rechner einwandfrei läuft. Das Spiel ist weitgehend 
selbsterklärend. Ziel ist es, einen Planeten vor dem Unter- 
gang zu bewahren, indem man die Bomben vernichtet, die 
ein feindlich gesinntes Raumschiff auf das Uranlager des 
Planeten abwirft. Aber Sie müssen sparsam mit dem La- 
ser umgehen, den Sie zu der Zerstörung benutzen. 

Das Spiel verbraucht ca. 3822 Bvte. Ein 16 K ist also 
erforderlich. 


Variablen: 
A$: Anfangsgrafik “Trapper" 
S$: Schuß (Laser) 
C$: Laser löschen 
M$: Maschinencode 
L: Len A$ 
X/Y: Koordinaten für Anfängsgrafik 
1: Erster bis letzter Punkt der Anfangsgrafik 
A: Koordinate für den Strich unter “Trapper" 
Q: Verzögerungsschleifen Koordinate 
1: Koordinate für den Strich unter der Stadt 
B: Höhenkoordinate für Bombe 
Z: Anzahl der Bomben 
zb 


WAL_"5") 
LET P=A E 
BT AT Ya as PL: "Rs 
u: SE VAL "AE4 
14 IF PEEK_VAL "15437" <UAL "23 
\@"_THEN_PRINT AT NOT | er, NOT PI;" 
SIE_HABEN", ,P;" PU o 
is ee Asi-büpe a 


B=CoDE Asia) 
28 PRINT AT_A-56N PI,B;“ " 
22 LET 8=B+56N PI-(RND>UAL ".5 
“ AND SEN PI)-(CODE "P" AND B= 


"5" THEN 60 
33 PRINT ar SoDE_"" , ke" 
34_FOR I=LEN A$ TO VAL u SEN 
PL, grer -SEN PI 
38 PRINT AT I,CoDE "a"; "" 
FOR I=VAL B5-S6N PI TO LEN 


PRINT AT I,CODE “a 
NEXT _I 
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3878 IF ST>=1:1IF ST<=28:RETURN 

3282 PRINT"DER SPEICHER UMFASST NUR DIE 
SEITEN 1-20" 

3298 INPUT"SEITE-? ";S7 

3184 GNTO 3278 

3118 Ms="":PRINT"r. ":REM UP EINGABE 
3128 GET A$:IF As="":G0TO 3128 

3134 IF SIZE<IBB:PRINT"ABBRUCH WEGEN GEF 


OHR DER SPEICHERUEBER- SCHREITUNG" :GOTO 


F ASCCASI=SI3:RETURN 


LENIME+SSCH,STIIISZRHLR :RETURN 
= A$="E":5$0J,STJ=S$LJ,STI+ME :N$=" 
':G0SUB1328 
Ir ASCIASII IB MEEMEHNS 
3188 IF LENCSSCY,STIHMEII3I PRINT S$lJ,S 
TJ+Ms; "N" :GOTO 3128 
3198 FRINT-S$CJ,STI+NS5"C2EM" :GOTO3128 


P=P+iCODE " VAL By) #L 
„Bs} "}-CODE "3 iA (VAL 


B$)="2" THEN LET 


DD 
5 ZEICHEN- 

A NNNNNWOOYSSS 
SNNNOUSSWSUSSOO ONSOONNSNNNODSSUOS 
5509839335530 NNNNNS00SSWWSSSOODONN 
NNNOOSSYWSSSOOGONDOWUNNOUNNDOLWS 
en 


THEN LET Y=Y-1 
THEN LET Y=1+Y 
THEN LET X=1+% 
THEI 


A= 
kRads ATKRACE 
NEXT 
42Ö PRINT Aar 8,3;" IC). BY_PET 
ER DITTRICH rar 18,18; "OLAF SC 
HHIDT- 


PRINT AT 21.8 "EEE 


GSOSUB S288 
PRINT AT 21,8; "START MITB 


5 PRINT AT 28,8; "INSTRUKTIONE 


'S" THEN G0T9 349 
'I" THEN G0T0 278 


L=LEN ah 
I=si TO 
328 PRINT AT io, S1;A$(iI TO I 
321 FOR_ö=1 TO 
382 NEXT & 
385 RAND USR 15514 
31a NEXT I 
328 FOR I=i TO_31 
338 RAND USR 15514 
3438 NEXT I 
343 CL5 
358 REN_+s5AHEx# 
351 FAST 
352 PRINT AT 13,8;" 


1 won 
254 PRINT " 


357 FÜR I=1 TO 64 
359 PRINT zwi 


421 NEXT 


"usa PRINT AT 2,21; 
= LESE AT 1,21; " 
go 


3,3 ” 
435 en 

448 PRINT AT 8,4; "<--LASER I 
Kam sAaT 11,4; "<--LAÄSER II =" 
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re PRINT AT 


1,8; Nlaser® in 5 #"';AT 2,8; 
488 FOR_I=i TO 188 
432 NEXT I 
485 PRINT AT 8,4; " 

";AT 11,45" 


=B+ 
B=13 TTHEN SOSUB_ 928 


G0TO_ 6982 

PRINT AT_8, 2 53 
Base I=1 TO 

6 I 

PazNT EA 8,3;C$ 
LET LisL1-i 

PRINT AT 8,9; 

De B<>8 THEN RETURN 


Then G0TO 1888 
1 TO 30+RND+42 


RN 
PRINT Klee ze 28 5$ 
FOR I=1 


Fliegenfänger 


für den ZX-81 + 1K 


Bei Fliegenfänger geht es um einen 
Frosch (nein. ausnahmsweise mal kei- 
nen. der über eine Straße hüpfen muß), 
der innerhalb der Zeitspanne von ge- 
nau zwei Minuten so viele Fliegen wie 
möglich von denen mit der Zunge er- 
wischen muß, die über seinen Kopf 
schwirren. Genauer gesagt. der Spieler 
muß den Frosch anweisen, seine Zunge 
in eine von 5 Höhen schnellen zu las- 
sen, um eine Fliege zu treffen. War die 
Höhe korrekt. d.h. befand sich in dieser 
Höhe genau über dem Kopf des Fro- 
sches eine Fliege. so bekommt man ent- 
sprechend des Schwierigkeitsgrades 
der Höhe Pluspunkte. sonst Minus- 
punkte Nach Ablauf der Zwei- 
Minuten-Zeitfristerhält der Spieler sei- 
nen Punktestand (gut sind Ergebnisse 
über 95 Punkte). Ein neues Spiel kann 
durch RUN gestartet werden. 


Programmaufbau: 

4-6: Variablendefinition 

10-12: Zeichnen des Frosches und 
Warten auf Tastendruck 

14: Überprüfung. ob zwei Minuten 
schon vergangen sind 

16-24: Weiterbewegen der Fliege 
26-30: Eingabeannahme und -über- 
prüfung 

32-46: Öffnen bzw. Schließen der Au- 
gen des Frosches 

34-44: Aus- und Einfahren der Zunge 
48: Punktezählung 

-52: Zurücksetzen der Fliege und 
Rücksprung 


;"LASER_ I :& K 


IF 
> PRINT AT B,24; "X";AT B-1,24 


DIM As ivAL 
ET: 


22 


38 Ei AT „R-5CN 


NEXT _I 

PRINT az ER 3;08 
LET L2=L2 

PRINT AT Ira:ı 
en THEN RETURN 


LET =i 
IF Z=5 THEN G0OTO_ 1008 
Beurze I=1 TO 38+RNDz48 


RETUR 
FOR 5, To ı8 
FAST 


Ben 


T 
PRENT AT 17,20; © 
a HELL SEE PEFFEL BEE 
se PRINT AT" 5,7; "DRS URANLAGER 
VOLLKOMMEN ZE 
RSTOERT" 


958 EEREN "NOCHMAL 2" 
Were THEN G0TO 978 
938 zoro 34 
1888 PRINT Ar 5,7;"SIE HABEN DEN 
PLANETEN GERE 


a12 864 835 334 
881 831 888 237 
gan 835 219 835 


=16514 TO 16539 
3920 PORE” T,VAL nat To E}] 
8038 LET M$=M$(5 Tı 
8848 NEXT z 
8858 RETUR 
9998 BDyE NTRAPPEB" 
9999 RU 


CLS5 
ge] 
ot pıI 


LET 
NT AT Sat, x 


ODE Agın) 
LE: 


Erz 
ÜR 85>"5" THEN 50 


32 PRINT AT CODE "A pr; 
BergeBe ans As To" VAL B$-50N 


+8 _ LET P=P+iC0DbE " 
AEIUAL en =". 


EN _PI 
PRINT AT I,cone "2; je 
NEXT I 


FOR ISUAL B$-S6N PI TO LEN 
BBINT AT Tode: "az 


NEXT 


PRINT AT CODE "a 


"}-CODE (RS WAL 


Bley" 
sa ir" As (URL S$)="2" THEN LET 
AS NAL B$)=' 


Ss2 


SOTO CODE ".ı" 


Variablenliste: 


A$: Speichert die Positionen der 
Fliegen 

A: Laufvariable der aktuellen Fliege 
P: Punkte 


B: TAB-Position der aktuellen Fliege 
B$: Eingabe des Spielers 


Q: Nichtdefinierte Hilfsvariable; führt 
zum gewollten Programmstop anstelle 
von STOP. 
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Nach dem Laden des Pro- 
grammes zunächst mit 
“RUN” starten. 
Anschließend wird das Da- 
tum eingegeben. ein Menue 
stellt sechs Funktionen zur 
Auswahl. 


Programmablauf: 

1.) Neue Datei: Programm 
beginnt von vorne 

2.) Eintragen: Sie geben die 
Werte der jeweiligen Sachen 
ein. 

3.) Ändern: Sie können ein- 
zelne Eintragungen jederzeit 
korrigieren, damit der Häus- 
rat auf dem aktuellen Stand 
bleibt. Dazu geben Sie nur 
die entsprechende Nummer 


ein und an- 

schließend den neuen Be- 
trag. Da die Aufstellung 50 
Werte angibt, erfolgt die Kor- 
rektur in 3 Bildschirmfol- 


gen, 

4.) Überprüfen: Hiermit kön- 
nen Sie jederzeit diegemach- 
ten Eintragungen oder Ände- 
rungen abrufen - 

5.) Gesamtübersicht: Hier 
werden die einzelnen Werte 
der jeweiligen Zimmer ad- 
diert und ausgedruckt. Eben- 
falls erscheint dann der Wert 
des gesamten Hausrates. 

6.) Speichern: Gesamtes Pro- 
gramm wird auf Cassette ge- 
speichert. Dazu bitte wieder 
Datum eingeben. damit Pro- 


24 HOMECOMPUTER 


D 
N 1 REM HAUSRAT 
‘ 2 REM ic! 8771984 BY 
‘ 3 REM W.EISHEUER 
®. 4 REM 
0 44 CL5 
' 15 G0SUB 5038 
@! 28 DIM A(7,58 
! 25 DIM n$158,25) 
H 25 LET As${1)}="MOEBEL" 
' 27 LET A%${2}="SITZMOEBEL" 
®. 28 LET A% (3) ="TEPPICHE" 
' 29 LET #A$i4) ="BETTWAESCHE" 
' 38 LET A%$ (53 ="TISCHWAESCHE , HAN 
@ |  PTUECHER" K 
i 31 LET Agiß} ="LEIBUAESCHE" 
; 32 LET #$(7) 
' 33 LET A${8} 
®ı 34 LET A$19} 
\ 35 LET A$i10) 
' 36 LET A$(1l 
e! 37 LET A$i12) ="KOFFER TASCHEN" 
| 39 LET A% (13) ="VORHAENGE , SARDI 
NEN" 
N 39 LET As$ii14)="LAMPEN ETC." 
®@ı 48 LET A$i15)="SPIEGEL" 
\ PR LET A% (16) ="ELEKTROGROSSGER 
: r 
e! 42 LET A$i17) ="ELEKTROKLEINGER 
'  AETE" ] 
x 43 LET Ag {18} ="FERNSEHGERAETE" 
I 44 LET 9% (19) ="STEREOANLAGE" 
@ı 45 LET A& {20} ="KOFFERGERAETE" 
' 45 As (21) ="COMPUTER UND ZU 
ı  BEHOER" 
\ 47 LET Asi22) ="SCHALLPLATTEN" 
® 43 LET A$ 123) ="CASSETTEN" 
Ü 49 LET A%i24) ="FILM- UND FOTOA 
I PPARATE" 
[ SQ LET A$135) ="VIDEOANLAGE" 
' 51 LET A$i25) ="SANITAERE EINRI 
ı EHTUNGEN" 
oe. Ne LET A$ (27) ="HEIZGERAETE ‚0EF 
N . 
\ 53 LET A$i28} ="TOEPFE , SESCHIRR 
! BESTECKE" 
®@ı 54 LET 9$129) ="BILDER" 
h 55 LET A$ {38} ="UHREN" 
\ 56 LET A% (31) ="BARGELD , WERTPAP 
ı  IERE" 
®: 57 LET A$i32} ="BRIEFMARKENSAHMM 
' LUNG ETC." 
\ 58 LET A$ {33} ="SCHMUCK" 
®@: 59 LET A$i24}="PELZE" De; 
N 68 LET 9% (35) ="BUECHER ETC. 
\ 81 LET #$135) ="HAUSTIERE" 
' 62 LET #4 (37) ="PFLANZEN" 
@: 63 LET A%$ 138) ="GARTENMOEBEL" 
L 
ü 


Der ZX-81 verwaltet 
den Hausrat 
für den ZX-81 


Das folgende Programm errechnet den Wert Ihres Hausrates und gewährleistet geshungsgerechte Ver- 
sicherungsabschlüsse. Überprüfen Sie die Aktualität Ihrer Hausratsversicherung!! 


gramm auf aktuellem Stand 
bleibt. 

Bei Position 2-4 wird zu- 
nächst nach dem jeweiligen 
Zimmer gefragt. 

Sollte der ZX-81 aus irgend- 


54 LET A$i39) ="CAMPINGAUSRUEST 


einem Grundeinmal ausstei- 
gen. kommt man mit"GOTO 
1000" wieder ins Programm. 
Eintragungen werden in vol- 
len DM-Beträgen gemacht. 
also keine Pfg.-Beträge!! 


UBER 
ET A$i42) ="SPORT- UND HÜOBB 
YGERAETE" 
65 LET A$i4l)="SPIELZEUG”" 
67 LET Asi42) ="FAHRRAEDER" 
65 LET A$i43) ="KINDERWAGEN" 
59 LET A$i44) ="WERKZEUG" 
78 LET A$(45) ="LEBENSMITTEL,GE 
TRAENKE" 
?1 LET A$i4ö)="GLAESER" 
are LET A$i47) ="TOILETTENARTIKE 
73 LET A$i43 REGALE" 
74 LET A$i43 SONSTIGES" 
75 LET A$i58 SONSTIGES" 
88 DIM B$i7,22) 
81 LET B$i1}="DIELE,FLUR" 
82 LET B$i2 OHN- ‚ESSZIMMER" 
83 LET B$i3 SCHLAFZIMMER" 
84 LET B$iä "KINDERZIMMER" 
85 LET B$i5}="BAD TOILETTE" 
85 LET B$is "KUECHE" 
87 LET B${7}="KELLER, SPEICHER, 
SPIND" 
99 GOTO 1883 
180 CL5 
SL PRINT AT 18,8; B$iZ); TAB 28; 
i1d FOR x%=i1 TO 58 
115 PRINT AT_28,B;A$ (X) 
He INPUT AtZ,xX) 
25 _ PRINT AT_28,26;TAB 38-LEN 5 
Ts AIZ,XKI:AIZ,X) 
SCROLL 
iss NEXT X 
14a GüSUB 7128 
145 GOTO 188 
1228 


1885 PRINT AT 7,8; 

“seen. ND";AT 9,8, "EINTRAGEN. ... 
„ses.:,sET";AT 11,80; "AENDERN. ...: 
„eesune a HE"; AT 13,8; "ÜUEBERPRUEFE 
NasaaaassUPR";AT 15,8; "GESAHTUEBE 
RSICHT. nun. 17,8; "SPEICHERN 
isia INPUT M& 

1813 IF Msi TO2 THEN RUN 
1815 IF M$i TO: THEN S0TO 
1528 

en M$i TO 2)="RE" THEN G0T0 
Er M$i TO 2)="UP" THEN SOTO 
an IF Mm$i TO 2)="GU" THEN G0TO 
4288 

1835 IF M${ TO 2)="5P" THEN GOTO 
3228 

ı184a GOTO 1882 

1588 CL5 

1585 PRINT AT 2,18; "NEUEINTRAE" 
1518 GOSUB 7388 

1515 IF _Z=8 THEN GOTO 19988 

1528 GOTO 188 

2888 CLS 

2885 PRINT AT 8,12; "AENDERN” 

2819 GOSUB_ 72838 

2815 IF_Z=8 THEN GOTO 1888 

2188 CL5 

2185 PRINT B$iZ);TAB 38; "DM" 


cLS 
PRINT AT 1,7; 
BEE; AT 3,3; "STAN 


D+ 
NEUE DATEI... 
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z118 FOR x=1 TO 17 = 
2115_PRINT AT X+1,0;%;".";Ag$iX); 
TAB 32-LEN STR% AIZ,KI:RIZ,X 
2128 NEXT x 

ei25 PRINT AT 38,0; "WOLLEN SIE A 
ENDERN ?_ tiuzN}" 

2138 IF INKEY$="" THEN G0T0 2138 
a IF INKEY$<>"U" THEN GOTO 21 


2148 PRINT AT 28,2; "WAS WOLLEN 5 
IE AENDERN? 11-17)" 

2145 INPUT I 

u IF I<1 OR I>17 THEN 50T0 21 


2155 PRINT AT I+1,27;" ";AT 
28,8; "NEUE EINGABE FÜER NR.";I;" 


2158 INPUT AiZ,Tn) 

2155 PRINT AT I+1,27;TAB 32-LEN 
STR$ AlZ,I};AiZ,D 

2178 GOTO 2125 

2l18ß CLS 

2185 PRINT B$iZ);TAB 38; "DM" 
2198 FOR x=i13 TO 34 

2135 PRINT AT_X-156,8;%;".";as (X) 
TAB 32-LEN STR$ AIZ,X) ;AIZ,XI 
2288 NEXT X 

2285 PRINT AT 28,8; "WOLLEN SIE A 
ENDERN ? iUzN3" 

2210 IF INKEY$="" THEN G0T0 2218 
en IF INKEY$<>"U" THEN G0T0 32 


2228 PRINT AT 28,0: "WAS WOLLEN 5 
IE_RENDERN? (18-34) " 

2225 INPUT I 

Een IF I«13 OR I>34 THEN 6010 2 
2235 PRINT AT _I-16,27;" "AT 
„28,8; "NEUE EINGABE FÜER NR.";T; 


2248 INPUT AiZ,T) 
2245 PRINT AT_I-16,27;TAB 32-LEN 
STR$ ALZ,IT};AIZ,D 
2258 GOTO 2285 
CL5' 
PRINT B$iZ};TAB 38; "DM" 
FÜR X=35 TO 58 
PRINT AT_X-33,8;%;".";Aa$ iX 
S2-LEN STR$ AIZ,XI;ALZ,K 
NEXT _% 
PRINT AT 28,8; "WOLLEN SIE A 
ENDERN ? turn" 
2285 IF INKEY$="" THEN G0T0 2285 
Een IF INKEYS$<>"U" THEN G0T0 23 


2295 PRINT AT 28,8; "URS WOLLEN 5 
IE AENDERN? (35-58) " 

2382 INPUT I 

Ze IF I<35 OR I>58 THEN G0T0 2 


2318 PRINT AT_I-33,27;" "AT 
„eB.,8; "NEUE EINGABE FÜER NR.";T; 


2315 INPUT AiZ,T) 
2328 PRINT AT I-33,27;TAB 32-LEN 
STR$ A{Z,I};A{Z,D 
2325 G0TO 2238 
G0T0 2283 
STOP 
CLS 
PRINT AT 8,9; "UEBERPRUEFEN" 
GOSUB 7328 
Emez=a THEN G0TO 1988 
> 
PRINT B$12};TAB 28; "DM" 
FOR X=1 TO 17 
PRINT AT %+1,0;A$ (X); TAB 38 
STR$ AIZ,Xı ;A(Z,X 
NEXT X 
SOSUB 7288 
CLS 


PRINT B$iZI:;TAB 28; "DM" 
FÜR X=i5 TO 34 
PRINT AT_X-165,0:A$ (XI; TAB 3 
STR$ AIZ,X);RIZ,X) 

NEXT X 

3145 G0OSUB 7208 

3147 CLS 

3143 PRINT B$iZ);TAB 28; "DM" 

3158 FOR <=35 TO 58 

3155 PRINT AT_X-33,B;A$iX);TAB 3 

8-LEN STR$ AiZ,x);AlZ,%X) 

3168 NEXT x 

3165 GOSUS 7288 

3132 G0T0 39338 

d4aB2 CLS 

4385 

4212 

4215 x=i1 TO 58 

4228 LET DF=DF4A(1,%X 

4225 NEXT X 

4032 LET UE= 
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FOR X=i TO 58 
LET WE=WE+R (2,% 
NEXT X 


LET 5Z=8 

FÜR X=i1 TO 58 
LET_ 5Z=5Z+A (3,%) 
NEXT X 


52 
LET _BT=BT+A (5,% 
NEXT X 
LET KU=2 
FOR X=1 TO 58 
LET_KU=SKU+A (6,%) 
4125 NEXT X 
4138 LET KS5=a 
4135 FOR X=1 TO 58 
LET_KS=K5+4A (7,%) £ 
NEXT X 
LET G5=DF+WNE+5Z+KZ+BT+KU+KS 
4155 SLOW 
PRINT "GESAMTUEBERSICHT";TA 
;"DM";AT 2,8; "STAND: ";D$ 
=1 T07 
4215 PRINT Byix} 
4228 NEXT X 


4225 PRINT 


4,24; TAB 38-LEN ST 
R%$_DF;DF 


5,24; TAB 38-LEN ST 
8,24; TAB 38-LEN ST 
18,24; TAB 398-LEN 
12,24; TAB 38-LEN 
14,24; TAB 38-LEN 
15,24; TAB 


4245 PRINT 
TR$ BT;BT 
4258 PRINT 
TR$_ KU;KU 
4255 PRINT 
TR$ KS;KS 
4268 PRINT 


42565 PRINT _"GESAMTER HAUSRAT: ";T 
AB_3@-LEN STR$ 65;65 
4278 PRINT ' 


4275 GOSUB 72298 

4282 GOTO 1983 

5988 STOP 

GO22 LET D a 

EST UREENT "EINGABE DES HEUTIGEN 


PRINT B$iX);"= ";x 
PRINT 


"MENUE 


INPUT Z 
IF Z<1 OR Z>3 THEN G0TO 7388 


RETURN 
PRINT AT 21,8; "OKAY ? (Ur 


IF INKEY$="" THEN 50T0 7182 
IF INKEY$<>"N" THEN G50T0 15 


RETURN 
PRINT AT 21,8; "DRUCKEN 7 iy 


IF INKEY$="" THEN G0T0 7282 
IF_INKEY$<>"U" THEN RETURN 
PRINT AT 21,8; 


CLS 
GOSUB 5338 
BRINT AT 5.8) "ERSSBHTERR So 
‚8;" {=} 
EINSCHALTEN, DANN FE 
DRUECKEN" 
88215 INPUT R$ 
Sa22 SAVE "HAUSRAB" 
8225 G0TG 1883 A 
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Was ist TIPTAB? 


TIPTAB ist ein Hilfsprogramm und 
soll die Fehlersuche (falls nötig) in ei- 
nem aus HOMECOMPUTER oderCPU 
abgetippten Atari-Basic-Programm 
erleichtern. 

TIPTAB muß erst einmal fehlerfrei ein- 
gegeben werden und dann mit LIST- 
"D:TIPTAB” auf Diskette oder mit 
LIST”C:” auf Cassette abgespeichert 
werden (für Cassettenbenutzer emp- 
fiehlt es sich, TIPTAB auf einer extra 
Cassette zu speichern). 


Wie arbeitet man mit TIPTAB? 

1. Tippen Sie das von Ihnen auser- 
wählte Programm wie gewohnt in 
Ihren Atari. 

. Bevor das Programm gestartet wird. 
speichern Sie es auf Diskette oder 
Cassette ab. 

3. Nun kann das Programm gestartet 
werden. Läuft es einwandfrei. so 

brauchen die nächsten Schritte 
nicht ausgeführt werden (aber wer 
will. der darf). 

4. Programm läuft nicht, also: 

Geben Sie "NEW" ein (enthält das 


[597 


Wie arbeitet man mit TIPTAB 


zu überprüfende Programm Ma- 
schinencode oder POKE:. dann ist 
ein "RESET” angebrachter). 

5. Laden Sie das’ Programm wieder. 

.6.Laden Sie nun TIPTAB mit 
"ENTER "D:TIPTAB" oder 
"ENTER”C:” zu dem zu überprü- 
fenden Programm. 

7.Geben Sie nun "GOTO 32700” 
(ohne Zeilennummer!) ein. Es mel- 
det sich nun TIPTAB. 

8. Geben Sie das gewünschte Ausga- 
begerät an: P für Drucker, S für 
Bildschirm. - 

9. Auf die Frage Zeilen/Block geben 
Sie den Wert ein, der in der Tabelle 
des zu überprüfenden Program- 
mes steht. 

Daraufhin beginnt TIPTAB folgen- 
des auszugeben: 
(von) - (bis): (Prüfsumme) 


Total: ... 

Vergleichen Sie die einzelnen 
Prüfsummen mit denen in der 
Zeitung. Gibt es eine Differenz, so 


 TIPTAB 


für den Atari 


geben die ersten zwei Zahlen den 
Zeilenbereich, in dem der Tippfeh- 
ler zu suchen ist, an. 

10. Beseitigen Sie den Tippfehler und 
wiederholen Sie die Schritte 7-10 so 
lange, bis keine Differenzen mehr 
auftreten. . 


Was TIPTAB nicht kann: 


Da TIPTAB einfach den Inhalt derein- 

zelnen Bytes, aus denen eine Basic- 

Zeile besteht, zu einer Prüfsumme auf- 

addiert, kann es folgendes nicht 

erkennen: 

- logische Fehler 

- Vertauschungen (z.B.: 10A=(B+C)D 
ist für TIPTAB das gleiche wie 
10A=(B+C/D) 

- Gibt man ”?” für "PRINT" ein, so 
stimmt die Prüfsumme nicht. 

- Da TIPTAB zusammen mit dem zu 

überprüfenden Programm im Spei- 

chersteht und die Zeilennummern ab 

32700 belegt, kann es keine Pro- 

gramme überprüfen, die ebenfalls in 


diesem Zeilenbereich liegen. 


32708 ? :? "Kicks' TIPTAB":TRAP 32702f 
DIM TTBOUTS<S5), TTBTMPS CHI 

327601 TRAP 40088 „ 

327@82 CLOSE 82:7? "Ausgabe: &creen Drei 
nter ?";:OPEN 32,4,@,'%K:':GET 832, TTBDE 
V:CLOSE 82:7? CHRSCTTBDEV) 

327864 IF TTBDEU=8I THEN TRAP 32736:0PE 
N 32,8,0,"E:':60T0 32712 

32786 IF TTBDEV=-88 THEN TRAP 32736:0PE 
nn 32,8,8,'P:':60T0 32712 

3271@ GCoTo 127802 

32712 TRAP 32712:? "Zeilen/Block";:INP 
UT TTBZBL:IF TTBZBL(1 OR TTBZBL)2@ THE 
n 32712 

32714 TRAP 48688: PRINT 22;'"Zeilen/Bloc 
K:";TTBZBL 

32716 LINADR=PEEK (136) +256#PEEK (1373 57T 
OTAL=® h 

32718 CHKSUM=8: FOR LINCNHT=1 TO TTBZBL 
32728 NATLIN=PEEKCLINADR)I +256*PEEK CLIN 
ADR+1) :LINOFS=-PEEKCLINADR+ZI:IF NATLIN 
=32708 THEN 32728 

32722 CURLIN=NXTLIN:IIF LINCNHT=1 THEN 6 
05uB 32738 

32724 FOR BYTPTR=LINADR TO LINADR+LINO 
FS:CHKSUM=SCHKSUM+PEEK (BYTPTRI : TOTAL=TO 
TAL+PEEK CBYTPTRI :NEXT BYTPTR A 
32726 LINAPR=LINAPR+LINOFS:NEHT LINCHT 


32728 IF CHKSUM=-8 AND NKXATLIN-I2708 THE 
N 32734 


'3273@ IF LINCNT>Z THEN PRINT 832;"-";:G 


o5uB 32738 

32732 PRINT 382;":";:CURLINZ=CHKSUM:GOSU 
B 32738:PRINT S2:IF NHATLIN(I2088 THEN 
32718 

32734 PRINT 32;°TOTAL:°;TOTAL:CLOSE 82 
:STop 

32736 ? :? "GEERD) ";PEEKC195) :ı TRAP 488 
88:G0To 32788 

32738 TTBOUTS$S=" “:TTIBTMPS=-STRSCCUR 
LIN) : TITBOUTSC6-LENCTTBTMPSIIZTTBTMPS:P 
RINT 832; TTBOUT$; :RETURM 
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SOFT coweurersysteme SHARP MZ-700 


Das SHARP-Softwarezentrum 


Anwendersoftware Literatur 
Programmiersprachen Hobby & Spiel 


Werbun: MZ-700-Computer zu 
9 ASSEMBLER Tiefstpreisen! 


Lagerhaltung i an En ab sofort mit URSOFT- 


I a ! 
Fakturierung Plottersteuerung Editor Standargpasca| x ee te 
5 200seitiges 2. Auflage! Plottersteuerung B: 2 g 
Textverarbeitung Handbuch Plottersteuerung Farbe sprache 
über 200 Befehle! oder Anwenderprogramm 
Adressverwaltung nach Wahl! 


Text-Adress-System Rufen Sie an! 


Kalkulation PCG-Graphik 2 
Kassenführung 6400 Punkte Auflösung Neu! Neu! 


jetzt mit techn.-wiss.-Zeichensatz und Graphikroutinen . 
in Basic integriert. Mit dt. Handbuch. Quickdisk MZ-700 


URSOFT® -Produkte erhalten Sie im guten Fachhandel oder direkt bei uns. 
URSOFT Computersysteme :Dipl.-Ing. Uwe Pansow - St.-Ingbert-Str. 1 - 8000 München 40 - Tel. 089/496055 


vor Ablauf der 12-monatigen 
Mindestbezugsdauer schriftlich 
kündigen. 


Datum/Unterschrift 


idR. U SEE E ZEEEE SEE CBue SEE PAEEE Sue Sue Eee Ze ee Ve ee ae ee Eee 
x 
HOMECOMPUTER IM £ 
x 
ABONNEMENT n 
Benutzen Sie bitte für Ihre Abbobestellung den markierten Abschnitt und x 
senden ihn vollständig ausgefüllt an die Verlagsunion & 
Friedrich Bergius Straße 7, 6200 Wiesbaden 5 
Q 
Ich möchte Homecomputer ab der nächsterreichbaren Ausgabe Garantie = 
zum günstigen Abonnementspreis von 55,- DM für 12 Ausgaben, monatlich % 
ins Haus geliefert bekommen. Wir senden Ihnen 
Homecomputer regelmäßig ab “ 
Name Nora der nächsterreichbaren x 
Ausgabe zu. er 
Straße PLZ Ort * 
ae anna ale (12 Hefte jährlich DM 55,- innerhalb der BRD, Die Lieferung erfolgt frei Haus % 
: inclusive Mehrwertsteuer und 
OD Bargeldios und bequem durch Benz: _TTT BLZ (vom Scheck abschreiben) Zu S t ell g ebühre N. x 
Konto-Nr. Geldinstitut Pi 
D Bogen Rechnung : * 
(keine Vorauszahlung leisten) Sie können Ihr Homecomputer- 
Mir ist bekannt, daß ich diese Bestellung innerhalb 8 Tagen widerrufen’kann. Abonnement jeweils 8 Wochen > r 
x 
x 


Diese Karte ausschneiden oder Fotokopieren und einsenden an umseitige Adresse. 


nn 0 I BR een he NEE En Se en ee EEE 


AUTOROUTE 


für den ATARI 600/800 XL 


Autoroute ist ein schönes Exemplar aus der Gattung 
der “Frogger”’-Spiele. Das Prinzip dürfte bekannt 
sein. Ihre Aufgabe ist es, Frösche über: eine 
mehrspurige Fahrbahn zu lotsen. Das ist vor allem 
deshalb nicht einfach, weil die verschiedenen Fahr- 
zeuge mit unterschiedlichen Geschwindigkeiten da- 
her kommen und somit. nur bedingt kalkulierbar 
sind. 5 


Werden es Ihre Frösche schaffen, die Laichplätze zu 


erreichen (und nicht in die e 
schieren zu müssen)? 


gen Jagdgründe mar- 


8 REM AUTOROUTE CHIGHWAYICOPYRIGHT MICH 
EL MINET 1984.MY ADDRESS: ROUTE DE DALH 
EM,9,BTE 3:4548 VISE.BELGIUM ‘ 
1 REM You HAVE TO DO 'POKE 82,8'"BEFORE 
THE WRITING OF THE PROGRAM 
Z REM IF A LINE TO LONG THEN USE FOR E 
KAMPL.THE LITTL.WORDS:GR. FOR GRAPHICS I 
N. FOR NEHXT:NO SPACE BETWEEN POKE & A 
NUMBER.. 
35 REM THIS PROGRAM CONTAINS A SUBPROGR 
AM IN MACHINE LANGUAGE,SAVE BEFORE "RU 
ne 
4 GRAPHICS 17:POKE 559,8:POKE 756,152: 
POKE 789,82:POKE 752,1:POKE 788,8:FOR 
I=128 TO 439:POKE Z8912+I,PEEK(S7344+I 
3:NEXT I 
8 FOR I=8 TO 7:READ A:POKE Z9816+I.,.A:P 
OKE 38912+I,255:POKE I893I6+I,8:NEXT I: 
FOR I=8 TO 7:READ A:POKE Z9168+I,A:NEH 
rı 
12 ? N6; "EEe@LEeLLEeL2e22e22222Ee2":FOR C=1 
TO 4:7 86;" ? n6 
“":NEXKT C:FOR I=0 


To 31 
-16 READ A:POKE 39I52+I,A:NEHT I:POKE 7 
18,68:FOR I=1 TO 6:DATA 255,255,129,25 
5,255,255,255,255,0,0,0,0,0,80,255,255 
28 DATA 183,168,164,166,165,180,128,12 
7.,255,0,81,219,85,81,0,255,93,85,85,93 
+,69,93,0,259,213,85,213,93,69,197,1,25 
4 
24 7? 186 ; ""GESBUEBEGGELELEGEUEBBLESEIEEREEIEIEEINE"" ; :NEHT I 
:POKE 54279,152:FOR I=39812 TO I9931:P 
, OKE I,®:NEXT I:FOR I=8 TO 7:READ A,B,C 
‚«D.,E,F,G 
28 POKE ZI9443+I,A:POKE 39481+I,B:POKE 
39I585+I,C:POKE Z9617+I,D:POKE 39722+I, 
E:POKE 39766+I,F:POKE 39896+I,G:POKE 3 
8944+I,G 
32 NEXT I:POKE 2806,216:POKE 287,155:P0 
KE 53277,3:POKE 623,1:POKE 785,132:POK 
E 784,213:POKE 7806,36:POKE 77,8 
36 FOR I=® TO 2:POKE 53256+I,1:NEHT I: 
FOR I=8 TO 96:READ A:POKE 1536+I,A:NEH | 
T I:DATA 231,128,7,119,192,119,24,226, 
220,226,34 
48 DATA 195,34,219,66,143,79,255,16,25 
4,255,255,143,250,159,252,83,60,255,14 
3,2580,159,252,83,24,66,143,79,255,16,2 
54 
44 DATA 68,226,220,226,34,195,34,231,2 
31.,128,7,119,192,119,195,104,230,203,1 
69,208,197,283,176,4,169,50,133,283,19 
L:7 


D 
‘ 
D 
D 
ü) 
ü) 
D) 
0) 
. 
0 
ü) 
D 
ü) 
{) 
D 
0 
D) 
D 
D 
D 
D 
L 
D 
[) 
ü) 
[) 
{) 
{) 
0 
0 
{) 


48 DATA 2084,234,169,58,197,204,144,4,1 
69,288,133,284,250,285,230,205,234,234 
»,169,2808,197,285,176,4,169,58,133 
52 DaTA 285,165,283,141,8,208,165,2804, 
141,1,288,165,285,141,2,208,96,104,198 
,206,2088,2,198,287,168,8,185,89,6,145 
56 DATA 206,200,192,9,208,246,96,1804,2 
38,206,208,2,230,207,76,66,6,0,24,219, 
255,68,24,60,231,195 
68 POSITION 8,28:7 86; "TRAVELNBNH":?7 3 
6; "SCORENBLEEEEEHEER" 6 "RECORDER"; R!POS 
ITION 8,23:? 36; '"AUTOROUTERUN YVZERIEEESEEE" : 
u=2 
64 GOSUB 288:POKE 712,282:POKE 707,282 
:POKE 559,46:FOR I=5 TO 15 
68 FOR II=-268 TO 186+I%9 STEP -1:50UND 
8,II,18,15:MEXT II:NEXT I:5SOUND 8,0,8 
‚®8:POSITION 8,23:? 36; ""RESERVE SWZEIREEE" 


72 POKE S3278,2:FOR I=263 TO 265:POKE 
I,PEEK(S3770) :NEHT I:H=INTCLSISHRNDCO)> 
+48:POKE 535251,K:W=10680:POKE 787,231 
75 W=W-S:POKE 77,8:A=USRC1536)I :K=PEEKC 
6323 :IF K=14 THEN SOUND 8,5,14,15:SOUN 
D 8,8,8,8:A=USR (1594) :A=ZUSR 15343 

88 IF CK=73+CK=11) THEM HK=H+CK=7)-CK=1 
12:SOUND 8,9,14.15:50UND 8,0,8,8:POKE 
53251,K:A=USRCASSGI:IF CH<(48) +CH) 201) 
IHEN 156 

85 IF PEEK(SS263)>8 THEN 1486 

98 IF PEEK(S53279)=6 THEN 165 

95 IF. PEEKC2086)>139 THEN 75 

188 LOCATE INTCCH-483/8),0,Z: IF Z=4 TH 
EN 146 

185 COLOR 4:PLOT INTCCH-483/8),8 

118 FOR II=1 TO S:FOR I=@ TO 239 STEP 
28:SOUND 8,1,18,15:NEHT I:NEXT II:SOUN 
D 8,8,6,8:T=T+1:IF W(99 THEN W186 

115 IF T=28 THEN 1886 
126 S=5S+W:POSITION 8,28: 
Tzu":?7 86; "SCOREN";S 
125 FOR I=® TO 14:A=USRC1S94) :NEHT I:P 
OKE 707,282:POKE 286,217:C=USR (1594) :G 
oro 72 

148 YU=V-1:IF YU=-1 THEN 158 

145 GOSUßB 218:POKE 787,202:POSITION 9, 
23:2? B6:V:FOR I=125 TO PEEK (206) :A=USR 
£1594) :NEKT I:POKE 286,217:A=USRC15943 
:G60T0 72 

ı1S@ POSITION 8,23:? 6; THERBGAMERISHEN 
|pED":Gosus 218:POKE 787,8 

„155 IF S>R THEN R=S:POSITION 7,22:7 36 
(;R 

1168 IF PEEK(S53279)=7 AND PEEK(644) THE 
ıN C=ZUSRC1S36):60T0 168 

1165 FOR I=125 TO PEEK (286) :A=USRE15943 
NEXT I:POKE 206, 217:A=USRC1594) :POKE 
ı 787,282: 1T=@:5=8:G0T0 68 

"188 POSITION 8,23:? 86;"FELICITATIONS! 
!4:525+1@0@8:FOR II=1 TO S:FOR I=1 TO 
ı38:5SOUND @,1,4,9:50UND 1,I,18,9:NEXRT I 
NEXT II £ 
1185 T=@:50OUND 0,8,8,8:50UND 1,0,0,0:60 
ISUB 288:G0T0 115 
|20e POSITION 8,0:7 46; "eqeeeeeeeeaeeee 
ı@eee":POSITION 19, RETURN 
‚zı® FOR I=® TO Z8:A=USRLISI6I :POKE 787 
ı ‚PEEK (53778) :A=USR (1536) :SOUND ®,RNDL® 
13*99,10,15:50OUND ®,RND(8)#99,9,15:NEKHT 
ı 

215 SOUND 8,8,8,8:RETURN 


? 


86; "TRAVELS" 


TIPTAB: AUTORDUTE 


72- 80:15499 
Zeilen/Block:3 85- 95: 2863 
e- 9318 186- 118: 7486 

3- 8:14368 115- 125: 7216 

12- 268:15796 148- 158: 8786 
24- 32:14644 155- 165: 8682 
36- 188- 288:10267 
48- 21e- 215: Sses 


68:11712 


TOTAL:175827 
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Farbtest 


für ATARI 400/600/800 XL 


Oft möchte man in seinen Programmen für Schrift, Hintergrund 
und Rand andere Farben haben, als sie vom Betriebssystem beim 
Einschalten oder dem Basic-GRAPHIKS-Befehl vorgegeben wer- 

“ den. Da der ATARI aber 16 Farben bietet, jede in 8 Helligkeitsstu- 
fen, kann es sehr zeitraubend sein, die passenden Farb- und Hel- 
ligkeitswerte durch Ausprobieren mit dem SETCOLOR-Befehl 
heraus zu bekommen. 


Eine gute Lösung des Problems bietet 
das Programm FARBTEST. Es erlaubt 
die Auswahl der Graphikmodes, Farb- 
register und deren Veränderung mit 
nur einem Tastendruck. Die ent- 
sprechenden Werte der aktuellen Farbe 
und Helligkeit jedes Farbregisters wer- 
den angezeigt, und können somit leicht 


werden. 


HINWEIS: 

Wenn man einen Graphikmode (3-8) 
gewählt hat, so werden die Daten auf 
dem Bildschirm nicht als Zeichen, son- 
dern als Punkte unterschiedlicher 
Größe und Farbe je nach Graphik- 
mode interpretiert. Also einfach in ei- 


nen Textmode (0-2) umschalten, um die 
Werte der Farbregister abzulesen. 


Im folgenden noch eine Tabelle mit 
den Bedeufungen der Farbregister in 
den einzelnen Graphikmodes: 

F= Farbe H= Helligkeit 


in Ihr Programm übernommen 


GRAPHICS-MODE FARBREGISTER COLOR(x) 


Textmode 0: nicht benutzt x entspricht 
0 und alle l: Zeichen (nur H) dem zu plottenden Zeiien/ßlock:s 36450-304906: 11837 
Textfenster (Farbe ist gleich ASCIIH-Zeichen 30008-308468: 5004 30500-305460: 10576 
der Hintergrundfarbe) 30050-50090:125088 I0556-30590:10159 
1: 30108-10140:10908 Z0600-38640: 4394 
2: Hintergrund (F/H) 30150-306198: 6129 30656-306908: 9851 
3: nicht benutzt 30200-302468: 5129 30706-38744:15768 
4: Rand (F/H) 30250-302989: 608? 30750-307686: 5709 
30300-303408: 90836 TOFAL:147677 
Textmodes 0-3: Zeichen (F/H) wie Mode 0 30350-30390:12471 
und? 4: Hintergrundund 30400-30440: 12111 
Rand (F/H) 
h ®0000000900000900000000000000000000 
Graphicmodes 0-2: Punkt (F/H) entspricht COLOR(I1)- 
3.5.7, : COLOR(3) ID 
h an 4 38670 POSITION 2,2:? 36: CEEEEREEEEERT 
: Hintergrund un EI 
Rand (F/H) COLOR(0) 30688 POSITION 4,3:? B6;"GRAPHICS ";:7 
26 ;.4 
Pr 0: Punkt (F/H) COLOR) 30896 POSITION 1,10:? N6;“"SHIFT @-8-GR 
ö : AFIK" 
1-3 nicht benutzt 30188 POSITION 2,11:? 36; "LEERTASTE-EN 
4: Hintergrund und DE" 
Rand (F/H) 30118 ? "TASTEN 8 BIS 4 = FARBKANAL ce 
43. 
8 0.3: nicht benutzt COLOR(I) 30120 .? "TASTEN + UND - = FARBWAHL ce 
1. Punkt (nur H) aaa .. CHE 
(Farbe'wie Hintergrund) er ? "TASTEN * UND = = HELLIGKEIT(E 
30148 SETCOLOR C,H8,Ie 
2: Hintergrund (F/H) COLOR(0) 30158 SETCOLOR D,H1,I1 
4: Rand (F/H) 38168 SETCOLOR E.H2,I2 
36178 SETCOLOR F,H3,1z 
38188 SETCOLOR 6,H4,1I4 - 
Listing: FARBTEST 30198 GOSUB T8680:G05UB 30708:60suB ze 


O00000000000000000000000000000000 
TIPTAB: FARBTEST 


720:G0OSUB 38748:6G0sus 38768 


30888 OPEN #7,4,0,"xK" 38288 GET 97,4 
38618 =1 30218 IF A=41 THEN J=8:60T0 zeeze 
36628 B=4:6=4:H4=1:14=4 30228 IF A=3Z THEN z8038 
Z8838 GRAPHICS 36238 IF A=24 THEN EI:T ET} 
38048 GOSUB 38680:6G05UB Z6788:G0SuUB Ze 30248 IF A=35 THEN Z0038 
720:G0SUB Z0748:6G05UB 30768 38258 IF A=36 THEN J-4:60T0 Z8838 
38858 POSITION 2,8:? 46; [EHEZEEZEZEEE 38268 IF A=37 THEN J=5:6G0T0 38838 
Fa 38278 IF A=38 THEN J=6:60T0 z80e38e 
38868 POSITION 2,1:? 36; "ASETCOLOR-TES 38288 IF A-39 THEN J=7:G0T0 zeeze 
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38298 IF A=64 THEN J=8:G0T0 38836 
38388 IF A=48 THEN B=8:IF B=8 THEN 
38318 IF A=49 THEN B=1:IF B=1 THEN 


38328 IF A=58 THEN B=2:IF B=2 THEN 


38338 IF A=51 THEN B=3:IF B=3 THEN 


38348 IF A=52 THEN B=4:IF B=4 THEN 


He>15 THEN He=15 
H1>15 THEN H1=15 
H2>15 THEN H2=15 
H3>15 THEN H3=15 
4H4>15_ THEN H4=15 
H8<8 THEN HO=8 
H1<8 THEN H1=8 
H2{® THEN H2=86 


H3<8 THEN H3=8 


H4<8 THEN H4=86 

I@>14 THEN Ie=14 
I1>14 THEN Ii=14 
38478 IF A=61 AND B=2 
I2>14 THEN I2=14 
IZ>14 THEN I3S=14 
I4>14 THEN I4=14 

I®<8 THEN I8e=8 


T1<e THEN Ti1-® 


I2<8 IHNEN I2=0 
38538 IF Aa=42 AND B8=3 THEN I3S=II-2 


Herr Direktor, hier bewerben sich 


zwei Herren als Hard- und 
Software - Spetialisten _..- 


38358 IF A=45 AND B=8 THEN HO=HB8+1: 
38368 IF A=45 AND B=1 THEN Ha=mi+1: 
38378 IF A=45 AND B=2 THEN H2=H2+1: 
38388 IF A=45 AND B=3 THEN H3=HI+1: 
308398 IF A=45 AND B=4 THEN HA=H4+1: 
=) 38488 IF A=43 AND B=® THEN HA=H8-1: 
30418 IF A=43 AND B=1 THEN Hi=H1-1: 
38428\IF A=43 AND B=Z THEN H2=H2-1: 
38438 IF A=43 AND B=3 THEN H3I=H3-1: 
30448 IF A=43 AND B=4 THEN H4=H4-1: 
Z8458 IF A=61 AND B=8 THEN IO=Ie+2: 
30468 IF A=61 AND B=1 THEN I1=I1t+2: 
THEN IZ=I2+2: 
38488 IF A=61 AND BES THEN I3=II+2: 
38498 IF A=Z61 AND B=4 THEN I4=I4+2: 
38588 IF A=42 AND B=8 THEN I®=I0-2: 


38518 IF A=42 AND B=1 THEN I1=I1-2: 


IF 


ır 


IF 


ır 


Ir 


IF 


IF 


ırF 


Ir 


Ir 


Ir 


ır 


IF 


ır 


IF 


IF 


IF 


365260 IF A=42 aND B=2 THEN I2=I2-2Z:IF 


: Ir 


-1I3{8 IHEN II=6 

30548 IF A=42 AND B=4 THEN I4=14-2Z:IF 
I4<8 THEN I4=8 

38556 IF A=I2Z THEN GRAPHICS B:END 
358568 POSITION 8,3:? un6;" POSITION 
19,3:?7 86; ";:POSITION 8,4:? B6;" ";: 
POSITION 19,4:7 86; “; 

38576 POSITION 0,$5:?7 8B6;" “;:POSITION 
19,5:7 6; :POSITION 8,6:?7 B6;" ";: 
POSITION 19,6:? B6;" “; 


308588 POSITION 6,7:? B6;'" ";,:POSITION 
19,7:?7 06; “ 
538596 POSITION 8,8:? 46; ";:POSITION 


19,8:17 no; "; 
38608 POP 


38618 IF B=86 THEN GOSUB 30678 
38628 IF B=1 THEN GOSUB 306986 
38636 IF B=2 IHEN GOSUB 30718 
308646 IF B8=3 THEN GOSUuB 30736 
38658 IF B=4 IHEN GOSUuß 387580 


38666 GOTO 398148 
38678 POSITION 0,4:7 H6;"€";: POSITION 
19,4:7 86;"t"; 

36688 POSITION 2,4:? B6;"SETCOLOR " 
26505:?2 B6;","5:7 B6;H05:7 865," 
R6;10 26; ":RETOURN 

38698 POSITION 8,5:? B6;"€e';:POSITION 
19,5:? 6; rt"; 

38786 PUSITION 2,5:? #86; "SETCOLOR “ 
u6:D n6; 2? B6;H1;:? B6;","; 
#6: 11; n6; :RETURN 

30716 POSITION 0,6:? B6;"€";:POSITION 
19,6: u6; ++‘: 

38728 POSITION 2,6:? 86; 
B6;E;:? B6;* 3:7? 8B65H2;:7 u6;","; 
46;12; 36; "RETURN 

38738 POSITION 8,7:? #B6; "€"; :POSITION 
19.7:?2 B6:"t": 

36748 POSITION 2,7:? 86;"SETCOLOR 

? B6b;H3;: 


? 


‚ 


4 


SETCOLOR 


387586 POSITION 8,8:? u6;"€ 
19,8:7?7 B6;'"t"; 
308768 POSITION 2,8:? B6;"SETCOLOR ';:? 
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Tutostar ist ein Programm. 
daß den Z-80 Prozessor si- 
muliert. Man benutzt dieses 
Programm, um in eigenen 
Maschinenprogrammen nach 
Fehlern zu suchen. Auch 
ROM-Routinen lassen sich 
sehr gut analysieren, 
Nachdem das Programm ge- 
startet wurde. bestehen 2 Mög- 
lichkeiten in die Haupt- 
routine zu springen. 

Die erste Option bewirkt. daß 
die Registerwerte so bleiben. 
wie, sie beim Verlassen des 
Programms waren. 


- Control Data 
gibt bekannt, daß sie ihr 
weltumspannendes Rech- 
nerverbundsystem (CYBER- 
NET) für die deutschen An- 
wender umstrukturieren wird. 
Der bereits seit dem Vorjahr 
an der Technischen Univer- 
sität in Karlsruhe instal- 
lierte Supercomputer vom 
Typ CYBER 205, der bis zu 
800 Millionen Rechenopera- 
tionen pro Sekunde durch- 


. Frankfurt. 


Auf der hifivideo 84 in Düs- 
seldorf erstmals vorgestellt, 
trittderSVI-318 H. hergestellt 
von SVI International Hong- 
kong und in Deutschland 
vertrieben durch 
neralimporteur. die Fa. B. Jöl- 
lenbeck GmbH. zu einem 
Preis und in einem Markt an. 
der bereits vom Marktführer 
dominiert wird. 

Was also hat der SVI-318 II 
zu bieten. um diesen, wie es 
scheint. ungleichen Kampf 
aufzunehmen? Zum einen ist 
da das überragende einge- 
baute BASIC zu nennen. das 
von seinem Umfang her 
wohl. das derzeitige Opti- 
mum darstellen dürfte. zum 
anderen verfügt der SVI-318 
über hervorragende Grafik 
und Sound-Qualitäten. die 
ihn zu einem ebenbürtigen 


den Ge-, 


Tutorstar für Spectrum 


Die zweite Option bewirkt. 
daß alle Register außer dem 
Befehlszählregister. die 
Werte annehmen, die sie 
beim Einsprung in Tutor- 
star haben. 

Nun können alle Register 
nach Wahl getestet werden. 
Anschließend kann eine 
MC-Routine in Single-Step 
(Einzelschritt) abgearbeitet 
werden, d.h. nach jedem 
MC-Befehl wird  unter- 
brochen und alle Register. 
Flags. etc. werden in Hex-. 
Dezimal und String ange- 


führen kann, übernimmt ab 
sofort die Hauptlast in der 
Bundesrepublik Deutschland. 
Der Großrechner in Frank- 
furt, eine CYBER 175, ist 
nicht mehr leistungsstark ge- 
nug; er wird durch eine um 
den Faktor 2 schnellere CY- 
BER 176 in Brüssel ersetzt. 

Mit dem CYBERNET-Netz 
bietet die Control Data über- 
wiegend komplexe technisch/ 
wissenschaftliche Software 


Rechner in jeder Preisklasse 
machen. Das rundherum 
positive Bild wird durch die 
zur Verfügung stehende lei- 
stungsstarke Peripherie ver- 
vollständigt. .obei dem neu 


zeigt. 

Während dieser Simulation 
darf RST 28 H jed. :h nicht 
verwendet werden. Als Op- 
tion kann eine aktuelle Stapel- 
liste angezeigt werden. 

Zu erwähnen ist. daß zu jeder 
Zeit eine Copy vom Bild- 
schirm mögiıch ist.-Das Pro- 
gramm ist mit dem Monitor- 
programm - von Profisoft 
kompatibel. d.h. beide Pro- 
gramme können gleichzeitig 
eingeladen werden. 
Folgendes Beispiel: 

Mit dem Monitor setzen Sie 


und Berauungsleistung an. 
Weltweit sind in diesem Sy- 
sten über 40 Rechner mit 
mehr als 500 Programm- 
paketen installiert. 

Die über 400 deutschen An- 
wender werden mit dem Aus- 
bau des Vektorprocessing- 
Service in die Lage versetzt, 
komplexe Versuche wie bei- 
spielsweise Windkanalunter- 
suchungen und Crash-Ana- 
lysen preiswerter und schnel- 


_._ 
Super-Expan- 
der SVI-605 in seinen ver- 
schiedenen Ausführungen. 
eine besondere Bedeutung 
zukommen wird. 

Alles in allem läßt sich sagen. 


vorgestellten 


einen Breakpoint in einer 
MC-Routine. Nun starten 
Sie das MC-Programm. Bei 
Erreichen des Breakpoints 
stoppt das Programm und 
der Monitor wird aufgerufen. 
Jetzt wird der. IZ-Befehl ein- 
gegeben. die Registerwerte 
des SP- und des PC-Registers 
sollten notiert werden. Mit 
dem J-Befehl kann man in 
das Tutorprogramm sprin- 
gen und das Programm in 
Single-Step weiter verfolgen. 
Wir denken. ein unerläß- 
liches Ultility für Maschi- 
nencode-Programmierer. 


Control Data erweitert die Möglichkeiten der technisch/ 
wissenschaftlichen Rechenzentren 


ler in einem Rechenmodell 
zu simulieren. Damit ent- 
fallen Zeit- und Kostenin- 
tensive Untersuchungen an 
reallen Modellen. 

Control Data zählt mit über 
12 Mrd. DM Jahresumsatz 
und weltweit 60.000 Mitar- 
beitern zu einem der führen- 
den Unternehmen der Daten- 
verarbeitung. 


= eo ee 
SVI-318 II-die Alternative? 


daß Geh SVI-3I8 trotz des 
kleineren zur Verfügung 
stehenden Arbeitsspeichers 
durchaus eine ernstzuneh- 
mende Alternative zum 
Marktführer darstellt. 
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Floppy-Stationen 


Die Firma NOC, in Deutsch- 
land, vertreten durch nbn 
Elektronik. Herrsching, stellt 
die Floppy-Stationen Serie 
mF 748 und mF 796 vor, die 
speziell für den IBM PC ent- 
wickelt wurden. In den 
Stationen werden TEAC- 
Laufwerke der Serie FD-55 
verwendet, mit einfacher 
(mF 748) oder doppelter (mF 
796) Spurdichte. 

Die Station wird ‚direkt an 
den internen Floppy-Disk- 


ür 


Einige zusätzliche Funktio- 
nen erleichtern die Arbeit 
beim Disketten-Handling. 


elektronisch simuliert wer- 
den. Über einen weiteren 
Schalter lassen sich die bei- 


Spurzähler zeigt an, auf wel- 
cher Spur der Kopf sich ge- 
rade befindet. 


Drive-Controller angeschlos- 
sen. 


Per Tastendruck kann der 
Schreibschutz der Diskette 


Personal Computer Sinclair OL 
Ende Oktober erhältlich 


Der 32-Bit-Rechner Sinclair 
QL ist Ende Oktober mit 
deutscher Tastatur, deut- 
schem Handbuch und mit 
Programmen in deutscher 
Sprache erhältlich. 

Mit diesem ungewöhnlichen 
vielseitigen Gerät. das über 
vier Grundprogramme für 
Tes- und Datenverar- 
beitung. Kalkulationen und 


Hand 


Nachdem in der Vergangen- 
heit verschiedene Im- 
porteure das Recht fürsich in 
Anspruch nahmen, die über- 
aus erfolgreichen Quick- 
shot-Joystick-Modelle SVI- 
101 und SVI-102 in der Bun- 
desrepublik 
vertreiben zu dürfen, hat es 
jetzt der Generalimporteur 
der SVI-Computermodelle 
SVI-318undSVI-328 nach ei- 
gener Aussage geschafft, das 
Alleinvertretungsrecht für 
die Bundesrepublik Deutsch- 
land auch für die Quickshot- 
Joysticks zu erhalten. Dieses 
wurde anläßlich der hifivi- 
deo 84 in Düsseldorf vom 
SVI-Generalimporteur der 
Firma B. Jöllenbeck. wäh- 
rend der Präsentation des 
2.500.000sten Quickshot-Joy- 
sticks SVI-101 mitgeteilt. 


Quickshot-Joysticks jetzt in einer 


Deutschland - 


Grafik verfügt, will die kürz- 
lich gegründete Tochter- 
gesellschaft Sinclair Re- 
search Ltd., Branch Office 
Bad Homburg, den Markt 
für professionelle Computer 
nachhaltig beleben. In den 
QL eingebaut sind zwei Mi- 
krolaufwerke mit einer Spei- 
cherkapazität von je 100K für 
die Massenspeicherung, die 
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den Laufwerke logisch gegen- 
einander vertauschen. Ein 


sich mit sechs weiteren 
Microdrives auf 800K er- 
höhen läßt. Hinzu kommt 
Netzwerkfähigkeit: 64 QLs 
können miteinander oder 


mit Sinclair Spectrum- 
Homecomputer vernetzt 
werden. 


Gedacht ist der neue QL für 
Selbstständige, Freiberufler, 
kleinere und mittelständische 


Spezial-Datenrecorder für Microcomputer: 


Boston Computer MC 3810 


Die meisten der derzeit ange- 
botenen Cassettenrecorder 
für Microcomputer sind abge- 
wandelte Musikrecorder. 

Der neue Spezial-Datenrecor- 
der System MC 3810 von Bo- 
ston Computer ist dagegen 
durch seine Funktionen klar 
auf die Bedürfnisse der Da- 
tenspeicherung ausgerichtet: 
Präzisionslaufwerk für opti- 
malen Gleichlauf, 1200 Baud 
Übertragungsrate, Motor 
Control durch CPU, Band- 
zählwerk, Pegelautomatik, 
Leuchtfelder für die Funk- 
tonsanzeigen "READY", 
"SAVE", "LOAD", "CON- 
TROL” und "DATA TRANS- 
FER"”, sämtliche Inter- 
faceanschlüsse aufder Rück- 
seite sowie ein- aus der 
professionellen Datenverar- 
beitung bekanntes techni- 
sches Design. 


* Commodore 2000/3000/4000 


Unternehmen, Schulen und 
Universitäten, aber auch für 
anspruchsvollere private An- 
wender zu Hause. In der 
Bundesrepublik Deutsch- 
land wird der Personal Com- 
puter QL 1.998- DM ko- 
sten. 


Über die jeweiligen Inter- 
facekabel ist der Datenrecor- 
der System MC 3810 univer- 
sell an Microcomputer von 
Commodore, Atari, Spectra- 
video, Acorn, Triumph Ad- 
ler, Sinclair, Sanyo etc. an- 
schließbar. Beim Wechsel 
des Computersystems kann 
der Anwender damitden Da- 
tenrecorder MC 3810 weiter 
einsetzen. 


Hier die technischen Daten: 
Der Datenrecorder MC 3810 
ist über Interfacekabel mit 
folgenden Microcom- 
putertypen kompatibel: 


Commodore VC-20/VC-64 
Atari 600 

Atari 800 

Sinclair Spectrum 
Sinclair ZX-81 

Acorn B 
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Acorn Electron 
Anyo Laser 
Oric 

Dragon 32 
Dragon 64 


Technische Features: 
Präzisionslaufwerk für opti- 
malen Gleichlauf, Motor 
Control (Computersteue- 
rung).Regelautomatik, End- 
abschaltautomatik, Leucht- 
felder für Funktionsanzeige 
READY, SAVE, LOAD, 
CONTROL sowie LED An- 
zeige für Datentransfer. 
Sämtliche Anschlüsse für In- 
terfacekabel sowie Stromver- 
sorgung an der Rückseite 
des Gerätes, 

Monitorbuchse auf Bedie- 


Disketten sind empfindlich 
gegen Schmutz. Ein staub- 
dichter Behälter gibt Sicher- 
heit. ERNO hat ein kom- 
paktes Dikettenaufbewah- 
rungs und Archivsystem 
entwickelt, das vor Staub, 
Rauch, Licht und mechani- 
schen Einflüssen schützt 
und eine schnelle Ablage, so- 
wie bequemen Zugriff er- 
möglicht: Die ERNO UNI- 
BOX. 

Auf kompakten Raum wird 
Platz für 80 Disketten ohne 
Couvert (bzw. 48 mit Cou- 
vert) geboten. 8 Abteile 
ermöglichen den Aufbau ei- 
ner übersichtlichen Datei. 
Die stabilen Trennwände 
verhindern Beschädigungen, 
wie Verbiegen und Knicken. 
Mit ergonomisch gestalteten 
Griffmulden lassen sich die 
Abteile leicht miteiner Hand 
‘blättern’ und weit öffnen. 
Die Fächer'werden mit dem 
dazu gehörenden Archi- 


Einen neuen Mikrocom- 
puter mit geballter Leistung 
stellte kürzlich die Firma 
Sony vor. 

Das Gerät mit der Bezeich- 
nung SMC-70GP Genlocker 
ist mit einer Z-80A CPU mit 
64KByte RAM und 16KByte 
ROM ausgestattet. Zwei inte- 
grierte 3,5”-Diskettenlauf- 
werke erhöhen die Speicher- 
kapazität. Neben der Sony- 


nungspanel, ölgedämpfter 
atenkassettenauswurf, 
Bandzählwerk. 


Datenübertragungsrate: 
1200 Baud 
Bandgleichlauf: +/- 0,3% 
Bandgeschwindigkeit: 
cm/sek. 
Stromversorgung: Externes 
Netzteil zur Wärmeab- 
leitung 220 Volt (nicht not- 
wendig bei Commodore VC- 
20/64 und Acorn B) 
Gehäuse: Farbe Greige im 
Profilook 

Masse: 25x 14x 12cm 
Gewicht: 1,2 kg. 

Garantie: 6 Monate 


4,75 


Angeboten wird der Da- 


Disketten-Archivsystem von Erno 


vierungs-Etiketten-System 


gekennzeichnet. Das hoch- 
wertige Kunststoffmaterial ist 
“Anti-Statik’ behandelt. Die 
im modernen 


a Fe Dr Pr ug ee nd FEB N 2 238122 De 
Video-Computer von Sony 


Gestaltung. 


eigenen Software besteht die 
Möglichkeit, auch CP/M- 
Software zu fahren. 

Der Videocomputer besitzt 
außerdem einen Grafik- 
Controller für 16 Farben, 
eine  Centronics-Parallel- 
schnittstelle, sowie 16 Ein-/ 
Ausgabekanäle. 

Die Besonderheit des Sony- 
Computers ist das steckbare 
Interface "”Superimposer”, 


tenrecorder MC 3810 zum 
empfohlenen Endver- 
braucherpreis von DM 98... 
Die Preise für die jeweiligen 
Interfacekabel liegen zwi- 


Design (Sockelfarbe com- 
puterbeige, braun-rauch glas- 
farbeabteile) paßt sich jeder 
Umgebung an. Die UNIBOX 
beansprucht wenig Raum 


das ein FBAS-Ausgangssig- 
nal abgibt. Dadurch besteht 
die Möglichkeit, externe Vi- 
deosignale (z.B. von einem 
Videorecorder oder Kamera) 
mit Computergrafik und 
Texten zu mischen bzw. zu 
überlagern. 

Diese Bilder lassen sich 
dann aufeinem Monitor wie- 
dergeben, oder aber auf Vi- 
deoband aufzeichnen. 


schen DM 8,- und DM 38... 
Nachweis über Boston Com- 
puter Handelsges.m.b.H., in 
München. 


und findet auch in 
Schreibtisch-Schüben Platz. 
Preis ca DM 40,-- (im 
Fachhandel). 


Der SMC-70GP Genlocker 
kostet in der Grundversion 
ca. DM 14.000,-; mit Interface 
und Monitor ca. DM 20.000... 
Vorwiegendes Einsatzgebiet ij 
des Sony-Computers könnte 
neben Demonstrationen auf 
Schulungen, Konferenzen 
und Hochschulen auch die 
Verwendung bei Filmpro- 
duktionen sein. 


—Jl 
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BERICHTE 


SPECTRAVIDEO SV 328 


ein Vorreiter des MSX-Zeitalters 


Es ist schon wirklich ein Kreuz mit unseren Computern: da sind 
sie allesamt so fortschrittlich und wirken manchem Zeitgenos- 
sen wie Dämonen aus einer unverständlichen fremden Welt - 
und dann muß der Anwender Tag für Tag erfahren, wie unbehol- 
fen, wie unvollkommen die Dinger im Umgang miteinander sind. 
Keiner versteht den anderen, unterschiedliche Schnittstellen, 
Normen, Prozessoren, kunterbunte Sprachbarrieren, alle ver- 
hindern das, was der Insider gewöhnlich ”Kompatibilität” 


nennt. 


Der Zungenbrecher bedeutet Anpassungsfähigkeit - und weil es 
eben daran mangelt, grübeln die findigen Köpfe in den Kon- 
struktionsbüros der Hard- und Software-Hersteller eifrig dar- 
über nach, wie man zu etwas mehr zwischenrechnerischer Ver- 


-ständigung kommen könnte. 


In Japan, wo man ja ohnehin ein ausgeprägtes Gruppengefühl 
besitzt, andererseits aber durchaus mit harten Bandagen zu 
kämpfen gewohnt ist, hat man in dieser Hinsicht Nägel mit Köp- 
fen gemacht. MSX heißt die Devise (vgl. auch unseren Artikel in 


HOMECOMPUTER 9/84) und steht für Microsoft 


uper 


Extended: Das Software-Haus Microsoft aus den USA hat fast 
so etwas wie Fahnenflucht begangen und mit der Konkurrenz aus 
Fernost ein Konzept auf-die Beine gestellt, das den gesamten 
Heimcomputer-Markt kurzfristig durcheinander bringen, dann 
aber um so schlagkräftiger und leistungsfähiger machen soll. 


Warum überhaupt MSX? 
Die Problematik ist so neu 
gar nicht. Sie hat nicht ein- 
mal speziell mit dem Com- 
puter zu tun, sondern ärgerte 
auch in anderen Bereichen 
schon ganze Generationen. 
Nehmen wir zum Beispiel 
den Fotomarkt mit dem fast 
unüberschaubaren Angebot 
an Filmen. Auch wenn wir 
die Schmalfilmerei außer 
acht lassen und von Spezial- 
produkten für ausgefallene 
Anwendung absehen, haben 
wir es immer noch mit sage 
und schreibe 8 verschiedenen 
Filmtypen zu tun (die unter- 
schiedlichen Sofortbildfilme 
nicht mit gerechnet). Und 
seit es die Videographie gibt, 
wissen die Fachverkäuferein 
Lied von den vielen Besit- 
zern eines Videorekorders zu 
singen, die ihr eigenes Sy- 
stem nicht kennen. 

Bei Computern nun ist dieser 
Ärger besonders groß: Wenn 
Sie in HOMECOMPUTER 
ein Spielprogramm finden, 
das Ihnen gut gefällt, heißt 
das noch lange nicht, daß es 
äuch auf Ihrem Gerät läuft. 
Und wenn Sie sich einen Druk- 
kerim Laden anschauen, der 
genau diejenigen Leistungs- 


merkmale aufweist, die Ihnen 
wichtig erscheinen, müssen 
Sie sich erst genau vergewis- 
sern. ob er auch "Ihren” An- 
schluß hat. 

Damit willMSX aufräumen: 
Einheitlicher Standard un- 
abhängig vom Hersteller, 
gleiche Sprachversion, glei- 
che Schnittstellen, gleiche 
CPU - kurz, vollständige 
Kompatibilität ist das Ziel. 
Die MSX-Geräte sind in Ja- 
pan schon bestens einge- 
führt: Namhafte Hersteller - 
auch aus dem Bereich der 
Unterhaltungselektronik - 
sind in das Geschäft einge- 
stiegen (JVC, Toshiba, Sony, 
Mitsubishi u.a.) und ver- 
sprechen sich für die Zu- 
kunft ein ernstzünehmendes 
Gegengewicht zur Technolo- 
gie aus dem Silicon Valley. 


Warum ausgerechnet der 
Spectravideo? 
So gut die MSXer in ihrem 
Heimatland angekommen 
sind, so zögernd beginnt das 
Europageschäft: England, 
der Nabel der Heimcompu- 
ter-Szene, bekommt zur Zeit 
zwarein geringes Kontingent 
an Computern des neuen 
Standards - der Run auf den 


kontinentalen Markt wird 
aber erst zu Beginn des kom- 
menden Jahres einsetzen. 
Tragisch ist das aber gar 
nicht, denn seit geraumer 
Zeit ist schon ein Computer 
verfügbar, der bis auf geringe 
Unterschiede im Modul- 
schacht als voll MSX-taug- 
lich betrachtet werden darf. 
Wir meinen den SV 328 von 
Spectravideo. 

Um diese Einstufung vor- 
nehmen zu können, müssen 
wir zunächst mal einen kur- 
zen Blick auf die Anforde- 
rungen werfen, die von MSX 
an einen beliebigen Rechner 
gestellt werden. 

Verlangt wird zunächst die 
beliebte und viel verwandte 
Z80-CPU. 

Dann brauchen wir noch ei- 
nen freien RAM von wenig- 
stens 32K, mindestens zwei 
Joystick-Ports sowie ein Be- 
triebssystem, das im ROM 
untergebracht ist. Daß der 
Interpreter für ein erweitertes 
Microsoft-Basicausreichend 
sein muß, versteht sich oh- 
nehin von selbst. 

Standard muß überdies auch 
eine über das Mittelmaß hin- 
ausauflösende Graphik sein, 
der schon oben erwähnte 
Modulschacht in normierter 
Ausführung sowie ein mehr- 
kanaliger Synthesizer für 
den rechten Sound. 

Ail dies bietet, wie gesagt, der 
SV 328 schon heute. 


Klingt nach Qualität: die 
Profi-Tastatur 

Wir müssen gestehen, daß 
wir nicht so recht an den 
328er heran wollten, als es 
ans Testen ging. Den Grund 
wird jeder schnell finden, der 
den kleinen Bruder unseres 
heute vorgestellten Gerätes 
kennt. Der 318 besitzt einen 
im Gehäuse der Zentralein- 
heit integrierten Joystick, der 
dem Computer ein schmuk- 
kes, ja. direkt fetziges Au- 
Beres gibt. Und weil für ge- 
lungenes Design durchaus 
etwas übrig haben, hat uns 
der 328 denn doch ein wenig 
enttäuscht: er wirkt wirklich 
bieder, .der Kasten in nüch- 
terner Pultform, an der 
nichts zu finden ist als die 
Tastatur. 

Aber das ist eine Bedie- 
nungseinheit, die sich gewa- 
schen hat. Wir haben al- 


lesamt schon an leistungs- 
fähigen Großcomputern ge- 
sessen, sind also einiges ge- 
wöhnt und stellen Ansprü- 
che - an der Tastatur des 
Spectravideo ließ sich aber 
wirklich nichts kritisieren. 


Sie nimmt die ganze Breite 
des Gehäuses ein, ist in der 
amerikanischen QWERTY- 
Anordnung ausgelegt und 


-besitzt einen sinnvoll konzi- 


pierten, getrennten Block für 
numerische Eingaben. Da 
dieses Feld nicht nur die 
zehn Ziffern, sondern auch 
die Cursor-Steuertasten so- 
wie die mathematischen 
Standardoperation (*,/+,-) 
und Enter zusammenfaßt, 
bringt es gerade beim lang- 
wierigen Arbeiten am Com- 
puter, z.B. beim Eintasten ei- 
nes Listings, große Bequem- 
lichkeit für den Benutzer. 
Nun wird mancher aber an- 
merken wollen, daß eine 
derartige Anordnung dem 
geübten Maschinenschrei- 
ber sehr hinderlich sein 
kann: Da wollen wir gleich 
beruhigen und feststellen, 
daß die Ziffern - wie bei einer 
Schreibmaschine - auch in 
der obersten Reihe der 
Alpha-Tastatur zu finden 
sind. Darüber finden sich le- 
diglich noch die jeweils dop- 
pelt belegten Funktionsta- 
sten, diemanja auch von an- 
deren Homecomputern und 
vielen PC’s her kennt. Maxi- 
mal 10 Funktionen lassen 
sich auf diese Weise vom An- 
wender festlegen. 

Rechts neben den Funktions- 
tasten befinden sich die 
Editiermöglichkeiten: CLS/ 
HOME, INSERT, DEL/ 
CUT - wobei die Cut- 
Funktion nichts anderes als 
ein Delete für ganze Zeilen 
darstellt. Unabhängig davon 
besitzt unser Gerät einen 
Korrektur-Modus, der der 
entsprechenden Einrichtung 
einer Schreibmaschine gleicht: 
ein Pfeil nach links bedeutet 
"Entfernen des zuletzt einge- 
gebenen Zeichens”. 

Auch ein Tabulator (Pfeil 
nach rechts) ist vorhanden 
und vervollkommnet unse- 
ren Eindruck, daß die Schöp- 
fer des SV 328 wahre 
Tipptapp-Fans gewesen sind, 
die der guten Schreib- 
maschine ein Weiterleben 
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im Computer gegönnt ha- 
ben. Weiterer Beweis dafür: 
die Caps Lock-Taste läßt 
nicht nur die Shift-Funktion 
”einrasten”, sondern verfügt 
auch über eine Leuchtdiode, 
wie sie bei elektronischen 
Schreibmaschinen zu finden 
ist. x 

Etwas irritierend für den pas- 
sionierten Basic-Program- 
mierer dürfte die Print-Taste 
sein, die zwar über dem nu- 
merischen Block prangt, bei 
Betätigung jedoch keine 
Wirkung zeitigt. Sie ist ledig- 
lich für den Maschinenspra- 
che-Kenner gedacht. 


Was die Tastatur verspricht, 
hält das Innenleben 
Noch vor zwei drei Jahr- 
zehnten hatten Produkte aus 
dem Fernen Osten stets et- 
was Zweifelhaftes an sich, 
wenn das Stichwort Qualitiät 
fiel. Die Japaner haben sich 
von diesem Negativ-Image 
mittlerweile frei machen 
können, ja sich sogar den 
Touch von zukunftsweisen- 
der Technologie und gera- 
dezu preußischen Ferti- 

gungskontrollen zugelegt. 
Dies scheint den Natio- 
nalchinesen nach und nach 
auch zu gelingen. 
Hochwertige Erzeugnisse 
wie der Bit-90 (der Bit- 
Corporation) oder der uns 
jetzt vorliegende SV 328 be- 
stätigen dies. 

Und so waren wir denn auch 
nicht überrascht, als wir den 
Test-Computer aufschraub- 
ten und eine Platine vor- 
fanden, die nicht nur durch 
akkurate Bestückung, son- 
dern darüber hinaus sogar 
über geradezu kunstvoll ge- 
druckte Leitungen verfügt. 
Angesichts dieser gelunge- 
nen Konzeption schien es 
dem Tester etwas verwunder- 
lich, daß ein banales Pro- 
blem, die Eindämmung der 
natürlichen Wärmeentwick- 
lung, unbefriedigend gelöst 
wurde. Eine Erwärmung auf 
weit mehr als 50° Celsius 
kann auf die Dauer nicht 
ohne Einfluß auf die emp- 
findlichen Bauelemente blei- - 
ben. 

Anmerken möchten wir al- 
lerdings, daß während unse- 
rer Testphase kein Ge- 
räteausfall zu verzeichnen 
war. 


(= 


Gute Bestückung 


Wir erwähnten bereits die 
Z80- CPU und den Video- 
chip von Texas Instruments 
(9918). Die Tatsache, daß der 


SV einen 32K-ROM und 28,5 
Kilo-Byte freien RAM be- 
sitzt, weist ihm von da her 
eine gute, jedoch nicht über- 
ragende Position im Feld lei- 
stungsstarker Heimcom- 
puter zu. 

Zur Verfügbarkeit des RAM 
sind noch ein paar klärende 
Worte nötig: Spectravideo 
macht sich in der einschlägi- 
gen Werbung des gleichen 
Fehlers schuldig, den BIT- 
Importeur Vidis begeht, 
wenn ein RAM, von dem für 
den normalen Anwender nur 
791 Bytes greifbar sind, als 


vierend, daß man böswillig 
von Irreführung sprechen 
könnte, auch wenn sich rein 
technisch eine derartige An- 
gabe rechtfertigen läßt. 

Von den 80 Kilo-Bytes des 
Arbeitsspeichers sind 64K 
adressierbar. Basic jedoch 
kann lediglich 32K greifen, 
der Rest adressiert das ROM. 
16K sind für den Video- 
bereich reserviert. 


Sehr gutes Basic 
Von einem Computer, der 
sich rühmt, Vorreiter des 
MSX-Standards zu sein, darf 
man sicher einiges in Sachen 
Basic verlangen, zumal 
Microsoft selbst für das 
Spectravideo-Basic verant- 
wortlich zeichnet. Und in der 


34K-Arbeitsspeicher _ ver- | Tat verfügt der SV 328 über 
kauft wird. Befehle und Kommandos, 
Specträvideo spricht ge- | die für andere Produkte nur 


wöhnlich von einem 80KB- 
RAM, doch melden sich nur 
29 199 Bytes als frei. Dieser 


in sehr teueren Tollkits zu 
haben sind: Der Zusatz 'ex- 
tended’ (also: "”erweitert”) 


Unterschied ist so gra- | kann also wörtlich genom- 
ABS DEFINT INKEY$ 
AND DEFSNG INP 
ASC DEFSTR INPUT 
ATN DELETE INSTR 
ATTR$ DIAL INT 
AUTO DIM IPL 
BEEP DRAW KEY 
BIN$ DSKF KILL 
BLOAD DSKIS LEFT$ 
BSAVE DSKO$ LEN 
CDBL ELSE LET 
CHR$ END LFILES 
CINT EOF LINE 
CIRCLE EQV LIST 
CLEAR ERASE LLIST 
CLICK ERL LOAD 
CLOAD ERR LOC 
CLOSE ERROR LOCATE 
CLS EXP LOF 
CMD FIELD LOG 
COLOR FILES LPOS 
CONT FIX LPRINT 
COPY FN LSET 
cos FOR MAX 
CSAVE FPOS MDM 
CSNG FRE MERGE 
CSRLIN GET MID$ 
CVD GOTO MKD$ 
CVI GOSUB MKI$ 
CVS GOTO MKS$ 
DATA HEX$ MOD 
DEF IF MON 
DEFDBL IMP MOTOR 


_ 


men werden. So können Sie 
mit VPEEKund VPOKEden 
Video-RAM durchforsten, 
mit SWITCH ein echtes 
Bank-Switching realisieren, 
mit CIRCLE und LINE alle 
möglichen geometrischen 
Figuren auf den Bildschirm 
zaubern und mit PAINT 
bunt anstreichen. 

Der Mehrkanalsound (drei 
Generatoren) ist leicht von 
Basic aus zu erzeugen: 
”Komponieren” können Sie 
dabei ganz leicht, indem Sie 
die benötigten Notenwerte 
(gegebenenfalls mit b und # 
versehen) in Buchstaben 
eingeben. 

AUTO und RENUM(BER) 
sind allgemein bekannt und 
müssen als Editierbefehle 
nicht näher erläutert werden. 
Der Bildschirminhalt kann 
von Spectravideo Basic dezi- 
mal, hexadezimal oder dual 
abgespeichert werden. 

Hier die gesamte "Vorratski- 
ste’ an Basic-Befehlen: 


NAME SCREEN 
NEW SET 
NEXT SGN 
NOT SIN 
OCT$ SOUND 
OFF SPACE$ 
ON SPC 
OPEN SPRITE$ 
OR » SQR 
OUT STEP 
PAD STICK 
PAINT STOP 
PDL STR$ 
PEEK STRIG 
PLAY STRING 
POINT SWAP 
POKE SWITCH 
POS TAB 
PRESET TAN 
PRINT THEN 
PSET TIME 
PUT TO 
READ TROFF 
REM TRON 
RENUM USING 
RESTORE VAL 
RESUME VARPTR 
RETURN’ VPEEK 
RIGHT$ VPOKE 
RND WAIT 
RSET WIDTH 
RUN xXOR 
SAVE 
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Die Graphik nenntsich zwar 
hochauflösend. ist heut- 
zutage jedoch nur mittel- 
prächtig einzustufen: 256 x 
192 pixels können 1984 kei- 
nen Fan mehr vom Hocker 
reißen - reichen andererseits 
für fast alle Einsatzbereiche 
voll und ganz. 


Wie ist denn bloß 
das Manual? 
Nicht zu gebrauchen, 
ganz fatal! 


Der SV 328 ist ein Computer, 
an dem wirklich nicht viel zu 
meckern ist: Schon finges für 
uns an, peinlich zu werden - 
da nahmen wir uns auch das 
Begleit-Handbuch vor und 
waren fast ein wenig er- 
leichtert. Endlich konnten 
wir wieder ein wenig giftige 
Tinte verspritzen und nach 


Ehrlich währt am längsten 
Auch die Computerszene ist voller Spitzbuben 


An diese Annonce werden sich be- “ 
stimmt viele unserer Leser erinnern: ” 


Herzenslust herummäkeln. 
Das Manual ist wirklich 
nicht gerade ein Wurf des 
Herstellers: Schon die eng- 
lischsprachige Originalver- 
sion war trostlos, das deut- 
sche Handbuch übertrifft sie 
allerdings immer noch. Bei- 
de Publikationen ergänzen 
sich aber auf eigenartige 
Weise. 

Die Originalausgabe hat ein 
Herz für den absoluten Be- 
ginner - man sollte an sie 
nicht mehr Ansprüche stel- 
len als derjenige, der seinen 
SV 328 dazu benutzen 
möchte, ein paar FOR.. 
NEXT-Schleifen und eins 
zwei PRINT-Anweisungen 
in den Speicher zu schrei- 
ben. 

Das deutsche Handbuch 
wendet sich erst gar nicht an 
den Anfänger, sondern wid- 
met sich: engagiert der loh- 
nenden Aufgabe, sämtliche 


Ka 
ENDLICH: 


Tips und Tricks für den 
'Großen’ von Spectravideo 
auf guten 100 Seiten Matrix- 
druck zu umreißen. Bis hin 
zu detaillierten Assembler- 
Hilfen wird vieles, allzu vie- 
les angesprochen, wichtige 
Fragen wie die Programmie- 
rung der Joysticks hingegen 
werden nur in kürzester 
Form gestreift. 

Hier sollte man sich wirklich 
mal an der Konkurrenz ein 
Beispiel nehmen (die aller- 
dings äußerst dünn gesät ist) 
- was Sharp mit seinem MZ 
700er-Manual gelungen ist, 
sollte Spectravideo auch der 
328 wert sein. 


Zu guter letzt 
Wie alle leistungsstarken 
Computer an der Grenze 
zwischen Home- und PC- 
Bereich schöpft der Spectra- 
video SV 328 seine Mög- 
lichkeiten erst als komplettes 


Kaleakeeateke 


ne 
Frisch aus der Pres 
Der neue Katalog: 
BEINE DREH ea ealeafefeafene Heck 


System voll aus. Im Klartext 
heißt das: Computer möchte 
gern erweitert werden! Es 
heißt allerdings nicht, daß 
der SV 328 nicht auch in der 
Grundversion schon eine 
Menge Spaß machen kann. 

Wir von der CPU-Redaktion 
meinen: Wer ernsthaft in die 
Computerei einsteigen will, 
bekommt mit dem Spectravi- 
deo ein vollwertiges Werk- 
zeug an die Hand, auf das er 


sich bestimmt verlassen 
kann. 
Was dasgroße Manko Hand- 


buch betrifft, so bleibt zu hof- 
fen, daß entweder der Her- 
steller bzw. Importeur eine 
revidierte Auflage anbietet - 
oder aber die Phantasie und 
Kreativität des Benutzers das 
aufarbeitet, was die bislang 


verfügbare Begleitliteratur 
offenließ. 
>> 
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endlich der ersehnte Katalog für die 
Versorgung aller TI-Besitzer. Hard- 
ware, Programme, Fachliteratur - und 
alles für ganze fünf Mark ’Schutz- 
gebühr’. 


Mancher hat da sofort ein Scheinchen 
in’s Kuvert gesteckt und ab nach Un- 
terschleißheim geschickt. 

Verblüfft war er dann aber einige Zeit 
später, als sein Brief ungeöffnet mit 
dem Vermerk "Zurück - Empfänger 
unbekannt” wieder im Briefkasten 
lag. Zeit, Mühe und Porto waren um- 
sonst, denn - die COMPWARE ist in 
Unterschleißheim völlig unbekannt. 
Und dabei hat der arme TI-User auch 
noch Glück im Unglück gehabt, denn 
oftmals dient die 'Schutzgebühr’ ledig- 
lich der Ausbesserung des Sparbuch- 
Saldos aufseiten des Händlers mit dem 
tollen Angebot. 

Unserer einschlägigen Recherchen zu- 
folge kam nämlich heraus, daß durch- 
aus nicht immer die Bestellung an den 


ö Hardware,So 


chein mit Ihrer 


* ALLES Für DEN x% 
6 


Ei 

A henieesieyenk 

Ftware ‚Bücher S 

E chalt- 

Pläne, Computermöbel ‚uow en 
Schutzgeb.5,-DM x 


hleissheim 
” 5 Mensen 


vielmehr davon ausgehen, daß Unzu- 
stellbarkeit nur Folge irgendeiner 
Panne war, im Fall der Firma COMP- 
WARE jedoch nicht als Regel gelten 
darf. 

Seltsam genug, das Ganze - und doch 
kommt der Clou erst noch: durch Zu- 
fall entdeckten die Fahnder den In- 
serenten unserer Compware-Annonce 
als Software-Lieferanten einer anderen 
Prregramm-Zeitschrift. Scheinbar hat 
man es hier mit einem Kandidaten zu 


Absender zurückgelangte. Man kann 
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tun, der es trefflich versteht. auf ver- 
schiedenen Hochzeiten zu tanzen. 

Ja, leider.wachsen mit dem Markt der 
Hart- und Weichwaren nicht nur die 
technischen Möglichkeiten - auch die 
Ideen. Tricks und Methoden manchen 
Gauners werden so auf erstaunliche 
Art verfeinert. 

Die Landeskriminalämter haben in- 
zwischen Dutzende von SOKO'’s (d.h. 
"Sonderkommissionen') gegründet, de- 
ren Mitglieder nicht nur über ein 
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wahres Sammelsurium an Heimcom- 
putern aller Größen und Preisklassen, 
sondern auch über die fachliche Qua- 
lifikation verfügen, um den immer raf- 
finierteren Ganoven Paroli bieten zu 
können. 
Allerdings ist das mit der Qualifikation 
so eine Sache: die Entwicklung aufdem 
Computersektor ist so rasant und un- 
übersehbar für den Zeitgenossen verlau- 
fen. daß Seminare, Lehrgänge und 
Fachkurse für Kriminalisten kaum ent- 
wickelt werden konnten. Schließlich 
basieren auch Unterrichtsmethoden 
stets auf Erfahrungen g; 
Generationen, an dere 
gelernt wurde. 
Und so steht man heute b 
lizei vor einigen Schwierigkeite 
Allerdings - und das muß‘ bjckti- 
vierung der Lage deutlich gesägt wer- 
den - geht es der Gegenseite nicht bes- 
ser. Auch der Rechtsbrecher hat es Tag 
für Tag schwerer in seinem "Beruf 
brauchbare Arbeit zu leisten. Der 
Polizei-Apparat setzt ebenso wie er die 
neuesten Erkenntnisse ein. 
Leidtragende sind in der Regel die Ge- 
schädigten: Anzeigen nutzen nicht viel. 
weil die Nachweisbarkeit im allgemei- 
nen fehlt. Und wenn wie im Fall unse- 
rer eingangs zitierten Annonce die In- 
dizienlage auch eindeutig sein mag. so 
nutzt es recht wenig, da man des Täters 
nicht habhaft werden kann. 
Andererseits sollte man als auf diese 
Weise geprellter nicht resignierend zu- 
rücksteeken: wer Gesetze mißachtet 
und ein deränt rückgebildetes soziales 
bi daß er sich nicht 
 enschen schamlos 
‚so verdient er es nicht 
besser, mit o rigorosen Mitteln 
und harten Bandagen bekämpft zu 
werden. Und so ist es nicht nur ein Akt 
der Gegenwehr. derartige Delikte zur 
Anzeige zu bringen: es ist auch ein T 
gesellschaftlicher Solidarit \ 
Sicher. der Verlust aus diesen verö 
lichten, aber nicht bezahlten Ins 
ist für Ihren HOMECOMPUTE 
verschmerzen. Leider ist es jedöch 


nicht das erste Mal, daß Ihr Computer“ 


Magazin Ziel eines solchen Anschla- 
ges wurde. 

Ende letzten Jahres wurden verschie- 
dene Abteilungen unseres Hauses von 
Spitzbuben heimgesucht. diesich ihren 
Lebensunterhalt nicht gern mit ehr- 
licher Arbeit Schritt für Schritt erar- 
beiten, sondern auf die Schnelle ergau- 
nern wollten. 

Nirgendwo sonst bietet sich das breite 
Berufsbild des Saboteurs so sehr als 
probates Mittel zur Bereicherung an wie 
in einem Unternehmen, das mit Soft- 
ware zu tun hat. 


Ein Verlag wie der unsrige, dessen Mit- 
arbeiter Tag für Tag, Woche für Woche, 
mit Hunderten von Programmen kon- 
frontiert werden, stellt geradezu einen 
Tummelplatz für Leute dar. die dem 
einträglichen, heute aber keineswegs 
mehr aparten Hobby der Sabotage frö- 
nen. Dabeisollten Sie jedoch nicht ver- 


Schon die Achleng vor der g 


igen 
Leistung anderer sollte einen beliebi- 
gen Software-Klau schon von vorn- 


herein 
chen. 

Nun. die ehemaligen Mitarbeiter. von 
denen hier die Rede sein soll, ließen es 
nicht dabei bewenden. Programme 
und Kenntnisse, zu denen sie durch 
ihre Tätigkeit für den Roeske-Verlag 
(wir könnten übrigens an diese Stelle 
andere Unternehmen der Branche set- 
zen) Zugang erhielten, zu stehlen und 
weiter zu verkaufen. Sie gründeten kur- 
zerhand einen Konkurrenz-Verlag, der 
Nutznießer unserer Recherchen und 
Verwerter unserer journalistischen Ar- 
beit wurde, In der Natur nennt man ein 
solches VerhalteimPärasitismus. hat es 
aber trotz vordergründiger Parallelen 
mit einem-efwas ändersgearteten Phä- 
nomei zu tun. Während@’nämlich in 
\ Flora das Verhältnis zwi- 


verabscheuungswürdig ma- 


schen Schmärötzer und Wirt durch an-. 


geborene Automatismen geregelt wird. 
die Betroffenen (Täter wie Geschä 
digter) 
‚Sollte man es unter me 
esehmit Individuen zu tu 
ben. die gei autonom und 

i ihe Handeln zu 


Dies klarzumachen ist um so dring- 
licher, als das Klima der öffentlichen 
Meinung in der Bundesrepublik der- 
zeit vergiftet ist, infiziert durch die un- 
glückliche Geisteshaltung, die Soli- 
darität nicht mit dem Opfer. sondern 
allein mit dem Gesetzesbrecher 
kennt. h 
Wer heutzutage aus dem "Gentleman 
Agreement’ unserer Gesetzgebung aus- 
schert, erhält. so traurig dies auch ist, 
vonseiten aller möglichen Instanzen 
den Rücken gestärkt. Alles. was in noch 
so abstruser Weise zur Entschuldigung 
seines Verhaltens beitragen könnte. 
wird zitieptsund auf die Bühne der öf- 
fentlicheh "Urteilsfindung gekarrt. 
Wenn di@’Argtimente etwaiger Milieu- 
Schädigung nicht ziehen. so wird nach 
anderen. Möglichkeiten gesucht. der 
anonymen:Größe "Gesellschaft" den 
Schwarzen Peter zuzuschieben. Haupt- 
sache: der Übeltäter kommt unge- 
schoren davon. 

Ein bemerkenswertes Paradoxon ist 
hierbei, daß dies in einer Epoche ge- 
schieht. die wie nie zuvor in unserer 
Kulturgeschichte die "Mündigkeit” des 
Einzelnen fordert. Der "mündige Bür- 
ger”. der sein Schicksal ohne Zutun des 
Staates in die Hand nimmt und verant- 
wortet. ist in aller Munde. Kommt aber 
die Theorie in die verzwickte Lage. sich 
in der Realität beweisen zu müssen. so 
wird seltsamerweise alles Gesagte zu- 
ickgenommen und der Täter als ver- 
meintlich unmündiges Kind in die Ver- 
«antwortung der Gesellschaft zurück- 
gesetzt. 

Diese Gesinnung sollte endlich einer 


mit nicht verantwortlich“ konsequenten Haltung Platz machen. 


die vor allem auch der Gerechtigkeit 


Raum läßt. Und dies betrifft nicht nur 


die Computer-Szene. sondern das 
menschliche Zusammenleben als 
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Trotz der Beliebtheit höherer 
Programmiersprachen dürfte 
es für nahezu jeden ernst- 
haften Computer-Fan ein Ziel 
sein, seine Programme bal- 
digst in Maschinensprache 
schreiben zu können. Diese 
Art der Programmierung be- 
inhaltet zwar einige Nachteile 
(man denke nur an die man- 
gelnden Editier-Möglichkei- 
ten und die hohe Absturzge- 
fahr), die Einsparung am 
Speicherplatz sowie die we- 
sentlich höhere Arbeitsge- 

schwindigkeit machen Ma- 
schinen-Programmierung aber 
zur professionellen Methode. 


Echter Maschinencode heißt 
nichts anderes als eine Flut 
von Binärzahlen. Daher er- 
halten sich auch die Profis 
gern ein Mindestmaß an 
Komfort, indem sie mit soge- 
nannten Mnemonics (deutsch 
etwa: Kürzel zur Gedächt- 
nisstütze) arbeiten. Dieser 
kleine Trick. auf dem das 
Prinzip der Assembler-Pro- 
grammierung beruht, erweist 
sich insbesondere bei der 
Überarbeitung des Listings 
als hilfreich: suchen Sie mal 
einen Fehler in einer Legion 
von Einsen und Nullen! 
Aber auch das Arbeiten in 
Assembler will gelernt sein. 
Man benötigt nicht nur eini- 
ges technisches Verständnis 
sowie die Fähigkeit, in der 
Logik des jeweiligen Prozes- 
sors zu denken - man muß 
auch das gesamte Instru- 
mentarium der.für den eige- 
nen Rechner geltenden 
Assembler-Version aus dem 
Eff-Eff beherrschen. 

Das soll allerdings nicht be- 


38 HOMECOMPUTER 


Aktueller Software-Test: 


deuten, daß dıe Aneignung 
dieses Fachwissens lediglich 
inteuren Seminaren, firmen- 
internen Fortbildungskur- 
sen oder aufspeziellen Fach- 
schulen erworben werden 
könne. 
Mit gutem Lehrmaterial ist 
Selbststudium durchaus mög- 
lich, ja sogar zu empfehlen. 
weil sich der Lehrplan nicht 
an irgendwelchen Stati- 
stiken, sondern ausschließ- 
lich an der eigenen Aufnah- 
mefähigkeit und Zeit orien- 
tiert. 
Für Ihren HOMECOM- 
PUTER war dies natürlich 
ein Anlaß, sich solch einen 
Fachkurs einmal näher an- 
zuschauen. Wir haben uns 
dabei für den ASEM-4 aus 
dem Konstruktionsbüro der 
Firma Wilke in Aachen 
entschieden. 
Und zwar ganz einfach 
deshalb, weil dieser Lehr- 
gang relativ preiswert ist und 
somit ruhigen Gewissens 
auch bei Eignung empfohlen 
werden kann... 
Als ich mein Exemplar aus- 
packte. war ich zunächst 
überrascht: zwei Bände fan- 
den sich neben der Diskette. 
Das kann ja heiter und vor 
allem langwierig werden, 
dachte ich! 

lücklicherweise entpuppte 
sich der schmälere zweite 
Band als eine praktische 
Sammlung von Lösungen zu 
den implementierten Übungs- 
aufgaben des Assembler- 
Kurses. Diese Trennung 
fand ich rechterfreulich. weil 
ich aus Erfahrung weiß, wie 
leicht man sich durch ein 
kniffliges Problem zum vor- 


ASEM-4 


Assembler-Kurs 


eiligen Spieken verleiten 
läßt. wenn sich die Auflö- 
sung nur ein paar Seiten 
weiter im gleichen Band 
findet. 

Nun zum Kurs selbst: 
ASEM-4 ist ein sogenannter 
Assembler-Emulator, d.h. 
das Programm erzeugt auf 
ihrem Rechner künstlich 
eine Art zweiten Computer. 
der. für Studienzwecke mit 
besonderen Eigenschaften 
ausgestattet ist. Das Soft- 
ware-Haus Wilke entschied 
sich dabei für den 4bit- 
Rechner. der auch in As- 
sembler-Programmierung ab- 
sturzsicher arbeitet und dar- 
über hinaus sehr langsam ist 
(was im Normalbetrieb ein 
Manko wäre. kann in un- 
serem Fall als entscheidender 
Vorzug gebucht werden). 
Nach dem ordnungsge- 
mäßen Laden des Kurspro- 
grammes ist den Host- 
Rechner (so nennt man den 
Computer, auf dem der künst- 
liche Computer simuliert 
wird/host= engl.: Gastwirt. 
Herbergsvater) erscheint ein 
dreizoniges Bild, das Ihnen 
nicht nur diverse Statusmel- 
dungen gibt. sondern auch 
als Eingabe-Maske dient. 
Nach einer grundlegenden 
Einführung in die wichtig- 
sten Begriffe der Computerei 
(z.B. Bit, Hexadezimal-Sy- 
stem usw.) geht der Kurs 
dann sogleich zum Kern der 
Sache über und startet mit 
einfachen Aufgaben. Über- 
haupt muß ich anmerken. 
daß man bei der Konzeption 
auf Praxisnähe Wert legte 
und viel theoretischen Bal- 
last außer acht ließ. 


Jede Aufgabe. jedes behan- 
delte Problem, ist mit detail- 
liertem Fluß-Diagramm ver- 
sehen. wodurch der Text 
nicht nur aufgelockert. son- 
dern als Darstellung auch 
plastischer und einprägsa- 
mer wird. 
Dazu helfen auch die 
Programmier-Vordrucke, 
die mich von der Gestaltung 
her an die Programmier- 
Hilfszettel erinnerten. die 
Weiland Texas-Instruments 
seinen Rechnern 58.58C und 
59 beilegte. Auf diesen Blät- 
tern kann man sehr schön 
die jeweiligen “Listings” ein- 
tragen: Rubriken für die 
Adressen. Codes. Labels. 
Mnemonics sowie kleine Re- 
marks gestalten das Ganze 
sehr übersichtlich. 
Ich muß sagen. daß ich die- 
sen Lehrgang wirklich emp- 
fehlen kann. Für die 98 
Mark. die er im Fachhandel 
kostet. bietet er wirklich 
mehr als eine Einführung in 
die Programmierung a la 
Assemler. 
ASEM-4 ist für Commodore-, 
Apple-. Sinclair-. Atari-, 
Texas-, Tandy-. Genie-Rech- 
ner sowie verschiedene. Sy- 
steme wie CP/M. MS-DOS 
u.a. verfügbar. wodurch dem 
Lehrgang ein breites In- 
teresse beschieden sein 
dürfte. Selbstverständlich ist 
jeder Kurs auch in einer 
Kassetten-Version verfügbar. 
Die Daten für ganz Eilige: 
ASEM-4 vom Ing.-Büro 
Hans-Jürgen Wilke, Post- 
fach 1727. 5100 Aachen. 

(sk) 
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Assembler-Listing ’ZS-Copy’ 


Commodore-User finden hier eine Utility, die ihrem Namen alle Ehre macht. 

Sie stellt wirklich eine ’nützliche’ Maschinen-Routine dar, mit deren Hilfe sich der Zeichensatz 
nicht nur kopieren, sondern auch editieren läßt. 

Sie ist durch das nachfolgende Basic-Listing gut dokumentiert. 


KRAUT S 
für den Commodore 64 


0 12COPY LDX #0 24 STA NZ+2 

1 *= 49152 130Z LDA 53248X 25 LDA Il 

2 LDA #48 14NZ STA 12288.X 26 EOR #4 x 10 REM ZEICHENSATZ-COPY IN MACHINE-CODE 
3STA52 15 DEX 27 STAl 20 FORX=49152T049228:READMC:POKEX.MC:NEXT 
4 STA 56 16 BNE OZ 28 LDA 56334 * 22 DATA169.48.133.52.133.56.173.14.220.41.254.141.14.220.165 
5 LDA 56334 17 INC 0Z+2 29 EOR #1 24 DATA1.41.251.133.1,160.8.162.0.189.0.208.157.0.48.202.208 
6 AND #254 18 INC NZ+2 30 STA 56334 %* 26 DATA247.238.26.192.238,29.192.136.208.236.169.208.141.26 
7 STA 56334 19 DEY 31 LDA 53272 R 28 DATA192.169.48.141.29,192,165.1.73.4.133.1.173.14.220.73 
8LDAl 20 BNE COPY 32 AND #240 30 DATA1.141.14.220.173.24.208.41.240.73.12.141.24.208.96 

9 AND #251 21 LDA #208 33EOR #12 % 40: 
10 STAI 22 STA 0OZ+2 34 STA 53272 50 SYS49152 

11 LDY #8 23 LDA #48 35 RTS x 5 ; 

DE a a Ar tg REM DEMO EINES NEUEN ZEICHENS 


80 Y=1:FORX=1TOY:READZN:FORJ=0TO7:READDN:POKE12288+ZN*8+J.DN:NEXT:NEXT 

90 DATA1.255,129,129,129,129.129,129.255:PRINT"Q AAAAAAA” 

100 : 

110 REM ERLAEUTERUNG: 

120 REM IN ZEILE 80 WIRD IN DER VARIABLEN Y DIE MENGE DER ZEICHEN ABGELEGT. 

130 REM DIE GEAENDERT WERDEN SOLLEN. IN DIESER ZEILE WIRD DANN DAS NEUE ZEICHEN 
140 REM AUS DEN DATA-STATEMENTS EINGELESEN. IN ZEILE 90 GIBT DIE ERSTE ZIFFER 

150 REM DEN BILDSCHIRMCODE DES ZEICHENS AN. WELCHES GEAENDERT WERDEN SOLL. DIE 
160 REM UEBRIGEN 8 DATAS GEBEN DEN BINAERCODE DES NEUEN ZEICHENS AN. DER NEUE 
170 REM ZEICHENSATZ STEHT AB ADRESSE 12288 UND IST VOR DEM UEBERSCHREIBEN DURCH 
180 REM BASIC ENTSPRECHEND GESCHUETZT. 
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Programm” erst zum fünften Mal in 
Ihrem Homecomputer - und schon kann 
man sich diese Fachzeitschrift ohne 
Super-Listing nicht mehr vorstellen. 

Allmonatlich bewerben sich Dutzende 
und Aberdutzende von Lesern um den 
Sieg und legen beredtes Zeugnis davon 
ab, wie hochkarätig die Programmierlei- 
stungen privater Anwender sein können. 


Auch an dieser Stelle wollen wir 
deshalb nicht den Hinweis schuldig 
bleiben, daß die Jury ein jedes Mal vor 
einer schweren Entscheidung steht, 
wenn sie sich für das eine oder andere 
Programm entschließen soll. 

Diesmal erfolgte der Zuschlag für das 
Utility “ZX-LOAD”, das uns Homecom- 
puter-Leser Sebastian Bade aus Berlin 
zusandte. Mit dem nützlichen Pro- 
gramm wird all denjenigen geholfen, 
die vom inzwischen betagten Sinclair- 
Computer ZX-81 auf den größeren 
Spectrum umgestiegen sind, bislang 
aber etwas ratlos ihrer Programm- 
Sammlung aus den ZX-8ler Tagen ge- 
genüber standen, die auf dem "großen 
Bruder” um's Zerplatzen willen nicht 
laufen wollen. 

Da dieses Problem nicht aus der Luft 
gegriffen, sondern tagtäglich eine Exi- 
stenzfrage vieler Sinclair-User ist, ha- 
ben wir uns über die Zusendung von 
Sebastian Bade ehrlich gefreut. 

Doch nun zu seiner Person. 

Lesen Sie, was er uns über sich und 
seine Erfahrungen auf dem Computer 
geschrieben hat: 


Ich, Sebastian Bade, bin 1964 in Berlin 
geboren, habe die Hürden der Schule 
gut überstanden und 1983 das Abitur 
gemacht. Jetzt studiere ich Bau- und 
Verkehrswesen an der TU Berlin. 

Meine ersten “Programmiererfahrun- 
gen” habe ich mit einem programmier- 
baren Taschenrechner von Texas In- 


struments gemacht. 


TOP-PROGRAMM 


für den ZX-Spectrum 48 K 


=D AD 


" 


Computer, einem Apple II, bekam ich 
durch die Schule. Hier war es möglich, 
den schuleigenen Computer nachmit- 
tags in eigener Regie zu nutzen. Voraus- 
setzung dafür war natürlich das Erlan- 
gen der Programmiersprache BASIC, 
was mit Hilfe öffentlicher Bibliotheken 
auch gelang. 

Eine engere Beziehung baute ich dann 
zu einem Superboard II (dürfte etwas 
weniger bekannt sein), den ich 
während eines Urlaubs seines Besitzers 
in Pflege hatte, auf. Zu der Zeit stieß ich 
auf den mit bis dahin völlig un- 
bekannten Begriff der Maschinen- 
sprache. 

Es dauerte aber noch einige Zeit bisich 
mir den Luxus eines eigenen. Com- 
puters leistete. Da ein Apple außerhalb 
meiner finanziellen Möglichkeiten lag. 
mußte ein ZX-81 her. Er kostete damals 
noch den stolzen Preis von fast 400 
DM. 

Der ZX-81 hatte einen entschiedenen 
Vorteil gegenüber dem Apple: 

Er gehörte mir persönlich und ich 
konnte ihn jederzeit benutzen. Leider 
erlitt der ZX-81 einen Chip-Infarkt und 
war fortan nicht mehr gebrauchsfähig. 
Es folgte eine traurige computerlose 
Zeit, die meinen Abi-Vorbereitungen 
aber sehr gut tat. Schließlich nahm ich 
ein günstiges Angebot wahr und kaufte 
mir einen gebrauchten Spectrum. Nun 
hatte ich zwar einen Spectrum, aber 
Software für den ZX-81. Da nun jede 
Kompatibilität zwischen Software- 
Kassetten beider Sinclair-Computer 
mit Erfolg ausgeschlossen wurde, ent- 
stand die Idee zum Programm "ZX-81 
LOAD”. Inzwischen hat der Spectrum 
auch Einzug iin das Büro meines Vaters 
gehalten und wird dort mit einer von 
mir erstellten Software halbkommer- 
ziell genutzt. 


1 % Homecomputer präsentiert: 
Sebastian Bade aus Berlin mit ZX- LOAD 
Nun erscheint die Rubrik “Top- Ersten Kontakt mit einem “richtigen” Funktion: 


Viele Spectrum Benutzer sind vom 
“kleinen Bruder” dem ZX-81. auf den 
Spectrum umgestiegen. Das Ärgerliche 
an der Sache ist, daß Kassetten mit 
BASIC Programmen des ZX-81 nun 
ungenutzt in einer Schreibtischschub- 
lade liegen oder die Programme 
mühsam in den Spectrum eingetippt 
werden müssen. 

Mit ZX-81 LOAD lassen sich nun die 
BASIC Programme vom ZX-81 (16K) 
direkt in den Spectrum (48K) laden. 
ZX-81 LOAD läuft in zwei Phasen 
ab: 

Zuerst wird das ZX-81 Programm gela- 
den. Danach wird dieses Programm in 
den Spectrum-Code übersetzt (das 
kann je nach Länge des Programmes 
ein Weilchen dauern). In beiden Pha- 
sen kann jederzeit durch BREAK abge- 
brochen werden. 

Die Arbeitsweise von ZX-81 LOAD ist 
ähnlich der von MERGE: 

Das im Speicher befindliche BASIC 
Programm wird nicht von dem gelade- 
nen Programm überschrieben. son- 
dern lediglich ergänzt. Die meisten 
durch ZX-81-LOAD geladenen Pro- 
gramme sind sofort ablauffähig, an eini- 
gen müssen erst kleine Änderungen 
vorgenommen werden. 2 

Äußerst problematisch sind die Befehle 
POKE und USR. Sie könnten beim 
Spectrum zum Systemzusammen- 
bruch führen. Deshalb werden die bei- 
den Befehle bei einem Programmab- 
lauf nicht ausgeführt und erzeugen 
die Fehlermeldung “C”. 

Die Befehle, SLOW. FAST. SCROLL. 
UNPLOT und PLOT (andere Bild- 
schirmansteuerung) sind im Spectrum 
BASIC nicht vorhanden und erzeugen 
bei einem Programmablauf ebenfalls 
Fehlermeldung “C”.Weiter ist zu be- 
achten, daß der Spectrum ASCII-Code. 
der ZX-81 aber einen speziellen 
Sinclair-Code benutzt. Das kann zu 
Problemen bei CHR$ und CODE 
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führen. 

Alle oben aufgeführten BASIC Befehle 
werden im Programmlisting durch 
‚FLASH gekennzeichnet. So ist ein 
schnelles Auffinden und eine einfache 
Korrektur ermöglicht. e 
Einige Grafikzeichen des ZX-81 sind 
im Spectrumzeichensatz nicht ent- 
halten. Sie werden der Reihe nach den 
“"UDG’s” des Spectrum zugeordnet 
(CHR$ 8 = CHR$ 144. CHR$ 9 = 
CHRS$ 145 usw.) 


WICHTIG: Erst den Cassettenrecor- 
der starten, 
dann ZX-81 aufrufen! 


Hinweise zur Eingabe: 

Zuerst wird Listing 1 eingegeben und 
mit GOTO 9000 auf Cassette ge- 
speichert. Dieses BASIC Programm 
dient nur zum Laden der Maschinen- 


CLEAR 61433 
PRINT " 


dann selbsttaetig!": 


Listing 2 


PÜKE 23658,8: 


LET end=652393 
GO SUB dez 


LET h=3: LET dig=4: 
PEIHT ’"$";h8$; 

LET Ji9s2 

FOR k=B TO 7 


PRINT " "5b; 
IMFLUT LINE hs 


GO SUB dez 
POKE .itk.h 
LET ch=ch+h 
HEAT k 
HEAT J 
5 FRIHT ’’"Pruefsumme: 
Go TO 10084 


LET h$="" 


LET hi1=INT Ch-18*%i > 


FOR i=h TO end STEF 8 


IF H$S=CHR$ 226 THEN STOP 
IF h&="" THEN LET h=PEEK, %.j+k: GO TO 248 
FRINT CHRS$ 8;CHR$ Sih$; 


sprache..ZX-81-LOAD wird später mit 
LOAD "ZX-81-LOAD" geladen und 
mit RAND USR 61440 gestartet. 

Falls dem Leser kein entsprechendes 
Monitorprogramm zur Verfügungsteht 
(beim Autor erhältlich), istnun Listing 
2 einzugeben. Das Programm wird mit 
RUN gestartet. Auf die Frage “An- 
fangsadresse?” gibt man "F000” ein. 
Auf dem Bildschirm erscheint nun 
“SF000” und der Inhalt der Speicher- 
stelle (wahrscheinlich ”00”). Nun gibt 
man die erste Zahl des Hex-Listingsein 
(“18”). Die “00” wird nun durch “18” er- 
setzt und der Inhalt der nächsten 
Speicherstelle angezeigt. Man verfährt 
nun entsprechend. Alle 8 Bytes wird 
eine neue Zeile mit vorangestellter 
Adresse ausgegeben. Soll einmal der 
Inhalt der Speicherstelle unverändert 
bleiben. so ist nur ENTER zu drücken. 


Fr ZABL-LOAD EXE" 
FRINT ’" 204 1984 Sebastian Bade" 
PEINT "Aufruf won Zu81 
LOAD "2831 -LOAB" CODE 

PRINT #8; AT 3,9; "Bitte eine Taste druscken, 


PAUSE 8: NEW 


SAYE "ZASI-LOAD" LINE 


a REM Hilfsprosramm zur Einsabe von Maschinencode 


CLEAR 61439: LET ch=8: LET hex=108@: LET dez=2006 
REM CAFSLOCK 
INPUT "Anfanssadresse CHEX> 7 "; LINE hf 


GD SUB hex 


LET h=PEER 2 3+k 3: GO SUB hex 


50 TO 15 


NICH 


FOR i=dig-1 TO 8 STEP -1 


LET HS=hS+CHRS& (4ö+hl+l7 AND h1>333 


LET h=h-h1k168*i 
HEXT i “ 
RETURN 
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[J 

' 

' 

ı 

LOAD mit"’ "RAND USR 61448" ! 
’ 

' 


"’"das BASIC Programm loescht"’" 


Das Eingabeverfahren erscheint zwar 
kompliziert, wird sich aber bei der Ver- 
besserung von zu spät erkannten Tipp- 
fehlern bewähren. 

Mit SHIFTA (“STOP”) kann das Pro- 
gramm unterbrochen werden. Nach er- 
folgreicher Eingabe (korrekte Prüf- 
summe) wird das Programm (die Ma- 
schinensprache) mit GOTO 9000 
gespeichert. 


“ZX-81-LOAD” "erklärt sich weit- 
gehend selbst. sodaß wir uns und Ihnen 
an dieser Stelle eine langatmige Ein- 
leitung ersparen können. 

Holen Sie sich doch einfach mal den 
Rechner und schauen Sie, was es zu 
Wege bringt. Viel Erfolg mit "ZX-81- 
LOAD", Ihrem TOP-PROGRAMM 
in HOMECOMPUTER 10/84. 
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u EEE 


E ai a 
2008 LET ha er 
2018 FÜR i=LEN h$-1 TO 8 STEP -1 
2828 LET hisCoDE he 
2832 LET hehtch1-48-67 AND hi>=CoDE "RA" )3x16%i 


za48 LET Kehl TO > 


m 
| 
I} 
PETE 
mis lin 


2553 NEAT i [212] 
2558 RETUFH ER 
aa SAVE "Z#S1-LOAD" COLE 51448, 9658 F3 
E& 

15 

2] 

Es 


ROSEN RA 
SED 
N 


IDEE 


IA 
gegsan 


Bun L 
vl FF 
ES E F 
Sr 
52 
FB 


Mmmnmi 
BR 


=D ; > 
Be) SF23E 1 
j #F235 3 FZ 20 Si 
53 56 98 3] 
ah 3F 28 3D 
2b 2A ar 3 = 
3223 24 38 
AB EA. [2]6) 
Dale Te Te) [213 
SF 50 SE 21 
EB 4.95 c3 
HE 2a 67 [er 
A ee] 4 
2 4 Fa 
FE En 
Sa 5 
ar ar 
3E Rn 
17 


ig 
IE gemen 
Due Kan ı U DEZE ET 


Giom 


DO E  E Zen 


1 
F SE Sa 
22 [als] zu a 
E A FS 3A 1E 51 
SZ 4F 4 12 
83 12 a1 F4 auge) 
2 s1 Fe 12 E12 
Re 4E 50 dl a4 12 
"95 2a Aa A FF FF 
zu; SC A2 43 Ga 
2 5 ls s15| [5]8] 
Fa 2a a ee 
a5 2A 2Ad 2 a a 
3 6 DE Deu 4 15 E15 BT] 
3E 14 F2 Eu ae 
= 22 E Fr Isla es Ts Be T5] 
"3 6 
er 5 
+ 
ro 
A 
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Ganymed 


für den ZX-Spectrum 


Bei diesem Spiel befinden Sie sich in einem Raumsystem. 
Sie können mit Hilfe von Richtungsangaben und zwar: 


U -FaLıs 
© für Osten E -Honsten 
W für Westen nee 

IST; 198 
S für Süden A 


N für Norden 


den Raum, in dem Sie sich befinden, wechseln. Ihr Ziel ist 
es, 30 Kristalle zu finden, die dazu nötig sind, um das La- 
byrinth wieder zu verlassen. 

Natürlich gibt es Monster und Fallen. Auch Todesstrah- 


len fehlen nicht. Sie müssen ‘mindestens 30 Kristalle | SERER RAUM, 
aufbringen. SUEBEN: B 
Wenn Sie dies schaffen, dürfen Sie das Spiel wiederholen. DSTEN : : & 
Doch leicht ist das ganz und gar nicht... STEN: } 


NS, 0,4% 


U 


SUNTERBRECHEN 


FRANKE 
INT (RND+488) +1 


' 
NEXT I { 


IF_RIEISCODE "OR AtEı=co 
& FEN „so To 535 
LET {E) 


o 


." THEN PRINT 
BRen CODE "=" THEN GO SUB “ 
ORGSCODE "€" THEN 50 SUB} 

ORG=CODE "M" THEN co sun! 
ORG=CODE """" THEN Go su! L 


4210 REM WORK Br: A ROOMS 
4215 LET BaRzH E- 


PRINT "HIER IST EINE KARTE 
ee 
RINT "yo 5 EINE = 
KLAERUNGNS.; WOLLEN SIE EINE NENT T 
oO ni ? 50 HM 
or. INKEVS ee, = READ 


BRINT AT 19,18; "Bitte warte 


SUB 588 


....-e..n...0..0.2.0.. 


H 
' 
4 
aan INFTIALIZE u 0 
f 0 488 F 
IE T u öR I =380 THEN LET! BERNER Ar Ey SE NORDEN: ";CHRI 
D) = ‘" THEN PRIN 4290 PRINT AT 9,8; "SLEDEN: ";chR! 
(1728) =I THEN LET IChRE Atıı; - INDERSE"N *_A(SO . ER H 
I=821 OR I=341 j 858 dag veRINT AT 18,3; "OSTEN : ";chH! 
38108 1-21 08 2 020 PRINT CHRS RAin); R%_ALERSTI \ 
81 OR I=81 OR Tzioı DR 1 IF 2Bs(INT (IYadI)=I THEN P 11,3; "WESTEN: ";cHı 
1 I 


? I=161 Tor I=zi181 
„u I=22i1 OR I=341 OR Is; 
251 THEN LET RI ODE 
IF AiI}=8 THEN LET RiT)=c0oD 
NEXT I 


LET_INIT=385 
so TO 385 
SuB 


3,3;"N, 5,0, 4, 


2.21; [ERKLAERUNG" 


4257 LET A{E} =0ORG 
gie IF INKEY$="" THEN 60 TO 4285 


5 50 
318 Far oT as AND M$<>"0" AND 
329 LET FN 80 AND, MSC2>"3" AND M$CH"w" 
338 Dane {Ch =CODE "." THEN LET A AND Mc > AND M$<>"n" AND MSc» 
iO) scoDE "g: 


"Ss" THEN ch] TO 4268 


339 LET csen 00) 4265_IF_(Ms M$="w") AND_E 


“R' THEN LET 


8 
a ge 1280 FOR Ira TO 5o@ 
x ®' THEN LET I 1201 nEsr 


12822 Ir „aLe-se THEN STOP 


{ >C 
E}=CopE "Bi 
375 LET .C=SFN 00) 

Ss2 IF one m.4250DE "R' THEN LET 


THEN LET 


« 
Dr. 53 THEN 50_SUB Mar 
L 


F E=0UT OR- E=OLU THEN 80 T 


ke G0_TO_REA 
LET Wü= Ihr IRND=121 +1 
1385 PRINT WO;“ CRYSTALS 


472 PRINT "SIE HABEN GANEYMEDE 
OEL UND SIND IN EINER H 


49 LET GRYSTALSS CRYSTALS+UO @ 
478 LET DUT=EN 00 ro RINT AT 
477 IE ADUTI<C>CODE “." THEN 6 
TO_478 
478 LET OLU=FN @0 [ 
4273 IF AlOUW) <>CODE "." THEN G 
TO 475 I=i 


PRINT mas 


(311; 
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PRINT "BERMSTRAHLEN. 2.2." 


4725 IF _AlEı=CODE OR ALIEN 
DE_"&" THEN S3 TO 4720 
4732 PRINT AT_17,3; "SIE WURDEN 
U_ RAUM ";E;" TRANSPORTIERT" 
5 LET/ORESA IE) 
ET AiB 


CODE "Fr 


@ PRINT "SIE SIND IN EINE 


FAL 
BE BEFALLEN 
1 PAUSE 58 

LEBT, 


NT_IRND#7I +1 
2 „ERRE 23692 ,22: PRINT AT 21, 


SIE TO 
Yz2);" 


17,144 
18,14+ 


a {1 TO 
FH IF I>4 a AT 
al, I>4 THEN PRINT AT 
I>4 THEN PRINT AT 19,14+ 
I>4 THEN PRINT AT 28,14+ 
G=1+ iRND#1) - (RND+1} 
co To’saae 
OLS 


LET NT_{RND*10) +1 
SCODE "." 
SIE HABEN EINEN RAUM 
EINEM HÜNSTER BETRETEN. ... 
S8e9 PRINT 
050 IF K<7 THEN PRINT "ES HAT S 
TE ee SEHEN. en 
5855 PRINT 
5858 IF K=1 THEN PRINT "UND E31 
55T SIE AUuf..z. (SCHLECOK} " 
Sara IF n=i 3 
5080 IF K:7 THEN P 
5198 IF Kid TNEN PRINT 


If 
SICH SCHLAFEN.ALSO HAT 
OcH NICHT GESEHEN." 
sııa IF K<4 THEN PAUSE 
Ä so TO 
{RND#5) +1 
THEN LET As$= 


"ES GIBT 
S1S@ IF K<>5 THEN LET A$="NIHMT 
SICH" 


a2 LET FF=INT (RND# (CRYSTALS-3 
+ 
5172 PRINT 


288 
RERD 


5188 IF K<7 THEN PRINT "ES ";AS; 
BENSRES KRISTALLE.“ 
Sisd_ IF K«? THEN IF 1)="65" TH 


EN LET ERYSTALS= KohtstaLsser 
s288 IF K<7 THEN IF Astl)="T" TH 
EN LET SRVäTALSSchrsTäls- FF 


52128 PRINT 
S228 IF K<7 THEN PRINT_"SIE HABE 
N_ JETZT ";ERYSTALS;" KRISTALLE" 
5231 IF K:7 THEN PAUSE 288 

5248 IF K:<7 THEN GO TO_RERD 


5258 PRINT "SIE SIND BEFLUECHTET 
5258 PAUSE 22a 


Der Spieler (im Spiel als “ 


=" dargestellt) muß miteiner 
Kugel eine Mauer zerschmettern. Dies geschieht, in- 
dem er die Kugel, die jedesmal, wenn sie aufein Hinder- 
nis trifft, ihre Flugbahn um 40 Grad ändert, mit einem 
Schläger daran hindert, das Spielfeld zu verlassen. Hat 
er alle Steine abgeräumt, werden seine Punkte auf- 


58 
18225, ERINT 


sara a La) RERD 
2a 


"SIE HABEN JETZT GANE 
VERLASSEN. ..." 


";ERYSTALS;" KRI 


5838 IF CRYSTALS<S® THEN PRINT 
WAS ABER NICHT GENUG IST...." 
592428 FRINT 

5858 IF CRYSTALS<SQ THEN PRINT_“ 
SIE WERDEN AUF SANEYHEDE STERBEN 
3##+RUHE IN FRIEDEN#zz3=" 

5852 IF CRYSTALS<380 THEN_STOrR 
5978 PRINT "URS GENUS IST UM NAC 
H HAUSE ZURUECK ZU KONMEN... 


5838 PAUSE 288 

5a92 CLS 

5188 PRINT "SIE SIND NUN SICHER 
AUF_DER ER NEEN nn ED ALLE 
KRISTALLE 
s11@ PRINT 
6128 PRINT 


"SIE HABEN _" ; ERYSTALS 
ne BEKOMMEN. 


DIESER_ST 
ELLE WEITER ZU Dane wur PRINT 
BEEN IF INKEY$<>"" THEN 60 TO 38 
el IF INKEY$="" THEN 60 TO 881 


8228 IF _INKEY$S="N" OR INKEY$="n" 
: 60 TO 88656 
"GANYMEDE" LINE 53855 
> PRINT 
ZUM LOESCHEN DDE 
C""ZUM WEITERSPIEL 


EN. 

Baar IF INKEY$="" THEN 60 TO 385 

8858 IF INKEY$="E" OR INKEYS=z"e" 

THEN RANDOMIZE LSR 8 
272 GO TO 3857 

READ 
AT 8,6; "GANEYMEDE III 

20 "SIE BEFINDEN SICH_IN 
EINEM RAUM-SCHIFF ‚WELCHES SIE Z 

UM_PLANET SANEYMEDE BRINST." 

8838 PRINT "IHRE AUFGABE IST ES, 

50 VIEL KRISTALLE ZU SAMMELN 

KOENNEN ‚UND DIE ZUR 
E ZU BRINGEN.DOCH UVEBERAL 

ERUERTEERTOD AUF SIE." 

"DER _PLANET HAT EIN U 
IRDISCHES HOHLENSYST 
DIE KRISTALLE VERSTE 

"DRUECKEN SIE EINE TA 

PAUSE 2 

"DIE GEFAHREN :" 


ä -VERSCHLOSSENER ı 
' 


IK 


[2 
ri 
{7} 


“4, 


für den Laser 210/310/110/VZ-200 


Das Actionspiel ”Break Out” dürfte jedem Telespieler 
bekannt sein, da es zu den Klassikern der Videospiele gehört. 
Trotzdem möchten wir eine Kurzanleitung 
für nicht so Spielerfahrene geben: 


IKB Speicherplatz. 
Viel Spaß! 


RAUM 2 "5 INVERSE/1,""" 
„3 INVERSE_2;" -EIN MONSTER 
8. £ -BERMSTRAHLEN 
+: a -EINE FALLSRUBE 


gerechnet, und die nächste Wand erscheint. 
Das Spiel wurde durch die Verwendung von Funktio- 
nen extrem schnellund beanspruchtnoch nichteinmal 


Gesteuert wird der Schläger mit den Pfeiltasten. 


* 
Sr -VERSCHLOSSENER 
SIE _KOENNEN NICHT IN 


5: 
8111 PRINT 
RAUM 


HE! 
"DRUECKEN SIE 


PRINT 


9115 PRINT "2. "; INVERSE 1; 
; INVERSE 8;" -EIN MONSTER 


WENN SIE MIT EINEM MONS 
ZUSAMMESTOSSEN ‚GIBT ES 
MOESLICHKEITEN. 

= -DAS MONSTER SCHLAEFT 


) -DAS MONSTER FRISST 5 
PRINT 


9117 PRINT "DRUECKEN SIE EINE TA 

s11s FRUSE 8 

8119 CLS 

S120 PRINT "3. & -BEAMSTRAHLEN 

I WENN SIE AUF EIN SOL 

CHES GERATEN WERDEN SIE Z 

ÜFRELLIG IM MOEHLENSYSTEM UMH 

ERBEUEST" 

sı21 PRINT 

Sı122 PRINT "4. 3 -EINE FALLGRUBE 
“ WENN SIE AUF EIN SOL 

CHES FELD GERATEN FALLEN SIE T 

N_EINE FALLGRUBE.SIE LEBERL 

EBEN WENN SIE LEBER 30 _KRISTAL 


u: BESITZEN. ANSONSTEN STERBEN 5I 


3125 PRINT 
S124 PRINT "5. = -KRISTALLE 

IN EINEM SOLCHEN Rau 
M_ SIND KRISTALLE VERSTECKT. 
DIE SOLLEN SIE SAMMELN.FÜUER JED 
= RESTE BEKOMMEN SIE 1.008.8 


ssea PAUSE 3 


9622 CL5 

9518 PRINT "SIE HABEN EINEN RAUM 
ETRETEN, WELCHER EIN GERRET B 

EN E TE) WELCHES SIE NACH DAR 

USSEI BEFOERDETE..." 

3820 PAUSE 288 

3538 50 u SBaR 

9780 FOR I=USR "A" TO LSR "A"+3ıl 

8710 RERD 23 

9728 POKE I,A 

9738 NEXT I 

9748 DATA 8,3,28,95,255,96,38,3, 

28,23,9,38,29,9,20,20,255,355,23 

1,219,219,231,255,255,28,28,20,5 

2,54,54,52,52 

93758 RETURN 

9997 STOR 

93995 SAVE "GANYMEDE" LINE 1 


0) 
ü) 
) 
D 
D 
D 
' 
D) 
{) 
D 
' 
D 
D) 
{) 
) 
D 
{) 
D 
D 
0 
{) 
D 
{) 
\ 
' 
{) 
{) 
' 
{) 
{) 
{) 
{) 
' 
' 
' 
N 
0 
{) 
D 
' 
{) 
D) 
D) 
' 
D) 
D) 
' 
' 
D) 
' 
0 
' 
' 
' 
' 
' 
' 
D) 
{) 
{) 
' 
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AARDCOPY VON BREAKOLIT 

> SO0OGO0NO- 

*  0000000r #4 KHR nen Nah 
»0 000000 HH #8 # HH HN 
»00 00000* #34 Hua Bu Hua HH 
»0000 0000° #4 ## 4 KHHR 
00000 000° Hua HH HER ah HH 
Si 2 Bar HH HH 

2 „> Lie Ze BE Ze 

as x nr ARHRh 

2 er LE 2 20 2:2 Ze 


® REM ++BREAK 
I REM 
REM 
REN 


OUT+tt 


BY WERNER 


THE LASER; . 


wwi 


REM 
REM 
GES 
C=6 :PO=8 

PO=PO+HI 

E=C/C 

B=C-E 

FORX=ETOC 
PRINT"*000000000* " 
NEXTX 

FORX=ETOC-E 


De - 0% 0 


w 
o© 


NEXTX 

GOSLIB6BA 
D=E 
F=D 


IFB> 1ATHENB=18 
PRINT@11X32, 
PRINTECX32+D," " 


D=D+F : IFPEEKL(CK32 
O=PO+18:SOUND14, 1 
201 


IFPO>=4S@THENPO=HI 


PRINT@CX32+D, "x" ; 
IFC=18THENGOTO2?8 


6070128 
E=-E 


OKTOBER 198% 


a PRINT"";TABC1B) ;"r 


PRINT@11%X32+B, "=": 


BRERKOUT FUER LASER 219/318 


REM ...HI FOLKS... IM BREAKING THROUGH 
REM GREETINGS TO PHD AND ALL THE OTHER 


SEND ME PROGRAMMS, . I WANT TO PLayı 
‘ 


IFINKEY$=", "THENB= 


IFINKEY$="M"THENB=B-1 
IFB<ABSCE)ITHENB=ABSCE) 


IFC>=18ANDB <> INTCD) THENGOTO398 
C=CHE : IFC=QTHENGOTO27@ 


+DJ1+28672)=73THENP 


IFC=1BANDB=INTCDITHENSOLNDI, 1 


:G0SUB589 :GOTOI 


IFD<ABSCE)J+ABSCF JORD> 18-ABSCFITHENF= 


IFPEEKCCCK32+0)+28672)=79THENE=ABSCE 


F=SGNCFIXCINTERNDCBOJII+ERNDCOJI+ABSCE 


298 
388 
Er 
318 
“38 
418 
428 
588 
518 PRIN 
E" :FORT=1T0898 :NEXTT 
520. PRINT" 
538 RETURN 

688 PRINT@1X32+412, 
681 PRINT@2%32+12, 
682 PRINT@3X32+12, 
683 PRINT@4%32+12, 
6984 PRINT@SX32+12, 
695 PRINT@?PX32+14, 
6865 PRINT@8X32+14, 
697 PRINT@9X32+14, 
688 PRIN 
689 RETURN 


GOTO269 


CLS 
RUN 


"th 
"a 
4 
"4 
"nuH 

HaH 
ze) 
"4 
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ELS:PRINT835, "STE ‚HABEN ";PO;" PUNKT 
PRINT@6?, "ZUM NEUSTART R DRUECKEN" 
IF INKEY$<> "R"THENGOTO488 
ELS:FORM=1T028 :SOUNDM, 1 :NEXTM 


8138, "FERTIG ZUR NAECHSTEN RUND 


TASTE!" 


E:2:203 
#48 
HH 
## 

#8 
sh 
4 
8 


@10X32+14,"HH8 Hk 


IMPRESSUM 


Aairagen nicht an Vortrieh oder Bruckerel, 


EZ: 2 u 2.2 Zu u 2 
# LE u ze 2 
HH HRR Hu" 
# ze ze 22 
EU E U 2) BE Ze Ze Zu 
Han! 

Fr 

ge 

no 
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Alle in HOMECOMPUTER veröffentlichten Bei- 
träge sind urheberrechtlich geschützt Alle 
Rechte, auch Übersetzungen, vorbehalten. 
Reproduktionen jeder Art (Fotokopie, Microfilm, 
Erfassung in Datenverarbeitungsanlagen, usw.) 
bedürfen der schriftlichen Genehmigung des 
Verlags. Alle veröffentlichte Software wurde von. 
Mitarbeitern des Verlages oder von freien Mitar- 
beitern erstellt 

Aus ihrer Veröffentlichung kann nicht geschlos- 
sen werden, daß die beschriebenen Lösungen 
‚oder Bezeichnungen frei von Schutzrechten sind. 


Bezugspreise: 

Einzelheft: 5,50 DM 

‚Abonnement: Inland 55,-DM im Jahr 
(12 Ausgaben) 

‚Ausland: Europa 80,-DM USA 110,-DM 


Autoren, Manuskripte: 

Der Verlag nimmt Manuskripte und Software 
zur Veröffentlichung gerne entgegen. 

Sollte keine andere Vereinbarung getroffen sein, 
so gehen wir davon aus, daß Sie mit einem 
Honorar von 100,- DM pro abgedruckter Seite 
im Heft einverstanden sind. 

Bei Zusendung von Manuskripten und Software 
erteilt der Autor dem Verlag die Genehmigung 
zum Abdruck und Versand der veröffentlichten 
Programme auf Datenträger. - 
Rücksendung erfolgt nur-gegen Erstattung der 
Unkosten. Zusendungen von Software zur Ver- 
öffentlichung sollen folgendes enthalten: 
Kopierfähige Kassette oder Diskette mit dem 
Programm (Computer-Bezeichnung), von Druk- 
ker erstelltes Listing oder Serie von Bildschirm- 
fotos (keine Schreibmaschinenlistings), evtl. 
Bildschirmfotos von einem Probelauf und aus- 
führliche Programmbeschreibung (Erklärung 
der Variablenliste, Beschreibung des Bildschirm- 
maufbaues, Farbe, Grafik usw.).Füreingesandte 


Anzeigenleitung: Programmunterlagen kann keinerlei Haftung 
Roeske Verlag, 3440 Eschwege übernommen werden. 
Erschelnungswalse: IVW geprüft. 
Inserenten 
Händler 39 
Luther Verlag 14 
p.t.m. Elektronik GmbH 75 
Video Vis 84 
Sybex 5/6 
Ur Soft 27 
Wilke 7 
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Atlantis 


für den VC-20 ohne Erweiterung 


Das Spiel “Atlantis” ist ein Grundversion-Spiel für den VC-20 
Das Listing benötigt bis auf wenige Bytes den gesamten 
Speicher. Es wurden keine neuen Zeichen definiert, um zu 
zeigen, was der Commodore-Zeichensatz leistet 
ET N rn En re 


Das Spiel bietet: 

- gute Commodore Graphik 
- guten Sound 

- Einleitung 

- High-Score-Wertung 


Spielbeschreibung: 

Nachdem das Raummonster gelandet ist, müssen Sie eine Ta- 
ste drücken. Danach beginnt erst das Spiel. 

Atlantis isteine Stadt unter dem Meeresspiegel, die von feind- 
lichen Kryptons (Einleitungsmonster) angegriffen wird. Sie 
müssen versuchen, diese abzuwehren. 

Dies erfolgt mit den Tasten: 

V = linke Kanone 

B = mittlere Kanone 

N = rechte Kanone 


® REM&* EINLEITUNG x* 

1 POKE36865,8:Q=1 

18 POKE36879,118 

11 PRINT" 

12 PRINT") >>> ATLANTIS BKCC<cccm" 
20 PRINT" EU LE m" 
30 PRINT"IBBBRRBEIG U mei men Li m at" 
40 PRINT'ERBE Mu " 

5® PRINT'IEREIN Mood Sivog m" 
68 PRINT'IREEII] Bene L’III 5 
78 PRINT" EMMA 

sa PRINT'IERBIE] Med 

so PRINT'EBBBIE % 

31 PRINT" EREBIEEBIG 
32 PRINT"IRBBBIG m 
33 PRINT'IERRIG = 
94 PRINT"IBBIM = 
95‘ PRINT'IRES = 

36 PRINT = 
188 POKE36878,15 
181 FORL=1T028 
1082 FORM=228-LTO158-LSTEP-4 

183 POKE36876 ‚M!POKE36865 ,212=2+.2 
184 NEXTM 


x xä 
“x 4 


4988 GETTS$: IFT$=""THEN488 
588 POKE36378,15:POKE36877,149 


628 POKE36385,42 

838 PRINT"I" 

648 TI$="0008999":Q=1:P1=B:K1=25 
1888 REMxx SPIEL x*x* 


1895 PRINT "  DURDHRHESDEDEKERDEIEDEIFDSERDEEE 
1887 PRINT'4 0 

1818 PRINT'IG wm 

1828 PRINT" WW 


185 FORM=1698-LTO228-LSTEP4:POKE38876 ‚M:NEXTM:NEXTL:POKE38878 ,8:POKE36876 ‚d 


S®®8 FORB=1T065:POKE36865 ,2 :POKE36877,14812=2-1:NEXT 
818 FORZ=1T021:PRINT"M":FORN=1TOI1Q:NEXT:!NEXT:POKE36877,8 


1882 FORL=7688 ERFELTUAE IDEE 1+22x13STEP22:POKEL,181:NEKXT 


Aber passen Sie auf, denn die Ufos können die Häuser am Bo- 
den des Meeres zerstören. Auch ihre Schüsse sind begrenzt. 
Die rechte und die linke Kanone benötigt je einen Schuß, die 
mittlere 2 Schüsse. 


Programmaufbau: ö 

Zeile 12-96: Zeichnen des Raummonsters 

Zeile 100-630: Bewegung des Monsters 

Zeile 1000-1060: Zeichnen der Stadt 

Zeile 1211: Bewegung des Ufos 

Zeile 1220-1240: Abfrage der Schüsse 

Zeile 2000-2240: Bewegung der Schüsse 

Zeile 16000-17020: Zerstörung der Häuser 

Zeile 22110-25190: High-Score-Wertung und Spielende 
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1838 PRINT"DEAM a un a sw" 

10848 FRINT''TGIN ww zvumi mi A49CwWwu er m“ 

1858 PRINT"CHIN wen 3 ww =" 

10860 PRINT —,————sesnelll" 

19878 M=7688+9x22:N=M 

1858 POKEM,SB:POKEM+1,62 

1288 POKE?7375,32 

1218 GETTS 

1211 N=N+1:POKEM,32:POKEM+1 ,32:M=N:POKEM,68:POKEM+1,62 

1212 IFM>?7988THEN15989 

1213 PRINT’ "3PRINT"BPUNKTE">P13" KUGELN"SKI 
1214 IFK1<X=8THEN2SO98 

12208 IFT$="V"THENGOSUB29098 :G0OTO2998 

1238 IFT$="N"THENGOSUB28998:GOTO2 198 

1248 IFT$="B"THENGOSUB29988 :G0TO2208 

12993 GOTO1218 

2888 Ki=K1-1:POKE7965+23,78:1=7965+23 

2838 POKE7866 ‚32:POKEI,78:POKE7988,78:POKEI+21,32 

2835 POKE8999,77:1=1-21:1F1<7680THEN2948 

2836 N=N+1:POKEM,32:POKEM+1 ,32:M=N:POKEM,68:POKEM+1,62 

2837 IFPEEK<CI)=6BORPEEK<T)=B2THENPI1=P1+199:K1=K1+2:G0T0109989 
2838 GOTO2839 

2848 POKE7988,78:POKE7975+22,85:POKEY976+22,73:1POKE7694 ,32:60T01218 
2188 Ki=K1-1:POKE7986 ,77:POKE7975 ,32:1=8039-44 

2138 POKE7336+23,77:POKE7975,32:POKEI,77:POKEI+23,32 

2135 1=1-23: IF1<7689THEN2 148 

2136 N=N+1:POKEM,S2:POKEM+1,32:M=N:POKEM,68:POKEM+1,62 

2137 IFPEEK<CI)=6B0ORPEEK <I)=62THENP 1=P1+188:K1=K1+2:60T0 10098 
2139 GOTO2139 

2148 POKE8989,77:POKE7975+22 ,85:POKE7687 ,32:60T01218 

2288 Ki1=K1-2:POKE7976 ‚32:POKE7975 ,32:POKE7976 , 181: 1=7976 

2238 I=1-22:POKE7976 ‚,32:POKEI,181:POKEI+22,321 IFI<768BTHEN2248 
2236 N=N+1:POKEM,32:POKEM+1 ,32:M=N:POKEM,6Q:POKEM+1,62 

2237 IFPEEK(I)=6B0RPEEK (I)=62THENP1=P1+180:K1=K1+1:G0T0 19088 
2238 G0TO2238 

2248 POKE7638 ,32:POKE7975 +22 ,85:POKE7376+22 ,73:60T01218 

5898 GOTOSBBB 

18888 POKE36878,15:FORG=1STO®STEP-. 1:!POKE36877 , 1601 POKE36878 ,G!NEXT 


180818 POKEI+23,32:POKEI+21,32:POKEI+22,32:POKEM,32:POKEM+1 ,32:60T01978 
150088 ONGGOTO 16089, 17998 
15815 FORJK=1TO12 


168808 POKE8983 ,32:POKE8982 ‚32:POKE8082 +22 ‚32:1 POKE8083+22 ‚32 

16881 POKEN,32:POKEN+1,32 . 

16885 POKE36878, 15:POKE36877 , 168: FORK=15TOASTEP-. 11POKE36878 ‚K:NEXT: POKE36877,8 
16887 POKEN,32:POKEN+1,32 

16818 Q=Q+1: IFA)2ZTHEN25908 

16928 GOTO197® 

17888 POKE8891 ,32:POKE8899 ‚32: POKESA9B+22 ,32:1POKESBOS1+22,32 

17881 POKEN,32:POKEN+1,32 

179885 POKE36878, 15:POKE36877 ,168:FORK=15TOBSTEP-. 11POKE36878 ‚K :NEXT:POKE36877,8 
17887 POKEN,32:POKEN+1,32 

17818 Q=Q+1: IFQ>ZTHEN25088 

17828 GOTO1978 

20888 POKE36878,15:POKE36877 ,168:FORK=1T028:NEXT:POKE36877 ,8:RETURN 
22118 PRINT"I" ; 

22128 PRINT"RERIIHRE PUNKTE"7PI 

22138 PRINT"MIHRE ZEIT "Tis 

25088 PRINT" ERWmmERd" ; : POKE36877,0 

25018 A$=" GAME OVER ":POKE36878,15 

25813 FORVB=1T06 

258015 FORJK=1T013 

25828. A$=RIGHTSCAS,1)+LEFTSCAS, 12): PR INT EEE" AS: POKE36876 , 138:FORQW=1TO 
2BS5:NEXT 

25825 POKE36876,8 

25838 NEXT:FORZX=128T0255:POKE36876 ,ZX:NEXT:POKE36876 ,8 

25848 FORZX=255T0128STEP-1:POKE36876 ‚ZX:NEXT:POKE36876,,8 

25188 NEXT 

25118 PRINT"WIHRE PUNKTE"7PI 

25128 IFPI>HSTHENHS=P 1: INPUT"BNAME*" INS 

25138 PRINT"IDER BESTE SPIELER" 

25148 PRINT"R"N$" MIT"HS" PUNKTEN" 

25158 PRINT"NOCH MAL” 

25168 GETCVS$: IFCVS="J" THENG48 

25179 IFCVS<)"N"THEN25168 
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OLYMPIAD 


FÜR VC-20 8K 


Nach dem Laden des Spiels erscheinen zunächst die Gespielt wird mit den Tasten fl und f7. Für einen Schritt 
Olympischen Ringe mit einem Willkommensgruß. Drückt drückt man die Taste fl, für einen Sprung oder Wurf F7. 
man dann eine Taste, bekommt man die Erklärung des Achtung! Schnelligkeit ist das höchste Gebot! 

Spiels zu sehen. Danach wird man zur Eingabe der Spie- 

lerzahl aufgefordert. Danach soll man die Namen der 

Spieler eingeben, (es empfiehlt sich, ordnungshalber die 

ersten zwei Buchstaben des Vornamens und des Nachna- VARIABLE: 


mens einzugeben. z.B. CE.LE.). Sz: Spieleranzahl 

Das Olympia-Programm besteht aus: Na$(x): Namen 

100 m Lauf Pt(x): Punkte je Spiele 
200 m Lauf Ti$: Zeit 

400 m Lauf . Sp: Spiel 

Weitsprung Pt: Wertung 
Speerwerfen 

Hammerwerfen 


REM x*% OLYMPIAD x%x% 
POKE36879,136:POKE38878,15:60SUB1114 
INPUT" EBBISP IELERZAHL"35Z 
IFSZ>3THENPRINT"WIBBITTE NUR 3 SPIELER" :FORT=1T02088:NEXT:GOTO3 
FORZ=1T0S2 : INPUT"SPIELER :"3NA$(2) 
NEXTZ 
PRINT" I" :GOSUB 1808 
PRINT " MBIaBMPROGRAMM : " 
PRINT'"EREBI- 100 M 
PRINT'BBBI- 208 M 
PRINT"BBBI- WEITSPRUNG 
PRINT"BEBI- 4080 M 
PRINT "IBBI- SPEERWERFEN - HAMMERWERFEN" :POKE198,8:WAIT1S8,1 
PRINT"":GOSUB1888:5SP=1 
FORQ=1T0S2:PT=8 ä 
PRINT" Seisieihirirli 08 METER -LAUF SE" NASCA):POKE198,B:WAITISS,1 
PRINT"MAUF DIE PLAETZE...":FORT=1TO1S®8:NEXT 
PRINT"LFERTIG... ":FORT=1TO1508:NEXT 
POKE36877 ,215:FORT=1T058:NEXT:POKE36877 ,8: T1$= "000000" 
FORL=1T0188 
GETQ$: IFQ$=" "THENZE 
IFOs< ) "m" THEN26 
PRINT "Epgsiebepinig "L" METER 
NEXTL 
PRINT " Bialaietsäsirisuen "PRINT EREMAERPEIT : "TI$ 
GOSUB1811 
PT<Q)=PT<Q)+PT 
PRINT"EERBBBPUNKTE = "PT 
FORT=1T04988 :NEXT:GOSUB 1888: NEXTQ 
PRINT"":GOSUB1888:SP=2:FORQ=1TOSZ : TI$= "9000998" 
PRINT" ZERO METER LAUF :M"NASCQ):POKE198,0:WAIT198,1 
PRINT"BAUF DIE PLAETZE..":FORT=1T01588:NEXT 
PRINT"LCFERTIG... ":FORT=1T01588:NEXT:POKE36877 ,215:FORT=1T058: NEXT:POK 
E36877,8 
64 PT=9:T1$="080090" 
85 FORH=1T0288 
66 GETGS:IFQ$=""THENSE 
68 IFGs<>"M" THENES 
69 PRINT"UIEUEEE  "H" METER 
73 NEXTH 
SO PRINT " Anjaleiniatsänien 
8i PRINT" Webmibeg 
32 GGSU5B1811 
S3 FRINT"IOERBBPUNKTE : "PT 
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94 PTQ5=PT<CW)+PT 
85 FCRT=1T02598:NEHT 
35 PRINT"Q":G605UB1808 
37 NEXTQ 
116 SP=3:FORQ=1T0OSZ:FORK=IiTOS 
117 PRINT" eilig WEITSPRUNG w"NAS(CQ):POKE1I8,9:WAITISS,1 
118 PT=8:T1$="099908":PRINT "rl 3 METER pr 
119 FORW=1TO28 
128 GETQS: IFQ$=""THENI2O 
IFO&< > "Mm" THENI2O 
PRINT" Sarpsprpug "11" METER 
NEXT 
PRINT"EEREERELIN SPRUNG I! 
SETZE: IFQ$=" "THENI1325 
IFO$= "WM" THENIE3 
SOTO12S 
FORG=215T0358:POKE3E377 ,6:FORTS1TOSY:NEXT:NEXTG 
FORY=259T02 1SSTEP -1:POKE36877 ,Y:FORT=1T058:NEXT:NEXTY:PR INT'REBBBPEIT : "TI 


GOSUB 1911 

PRINT" ERBEBEBPUNKTE : "PT 

PTQI=PTCG)+PT 

FOKE38877 ,8:FORT=1T02500 :NEXT 

PRINT"J":GOSUB 1098 

NEXTK :NEXTO 

PRINT"":GOSUB1890:5P=4 

FORG=1T032 

PRINT "zEirlekleiin 408 M LAUF SW" NASCA):POKE198,9:WAITIIS,1 

PRINT "BRIEFEN FERTIG ... ":FORT=1TO1598:NEXT 
> POKE36877 ,215:FORT= 1TOSO:NEXT:POKE36377 ‚8: TI$= "000000" 

FORU=1T0488 

GETS: IFOS=""THENISS 

IFQ&< >"B" THEN1SS 

PRINT" EIApgeeung "LI" METER 

NEHTU 

PRINT " Bieletktsugegegeneg TEL 

PRINT" IIBBBBPEIT "TI$ 

SOSUBI1B11 

FRINT"BERBBBPUNKTE : "PT 

PT<QAI=PTCÜI+PT 

FORT=1T02588: NEXT 

PRINT"":GOSUB 1900 

NEXTO 

PRINT"":GOSUB1800:5P=5 

FORQA=1T032 :FORE=1TC3:PT=8 

PRINT" wage SPEERWERFEN :M"NASCQ):POKEI98,9:WAITISS,1 
; TI$= "088000" 

FORN=1TO2S 
' GETAS$: IFO&=" "THENLIG 

IFG&< "Bi" THEN13S 

PRINT "Elsiteiskpupgg "N" METER 

NEXTN 

PRINT" Eleblepiasl  WURF 11! 

GETAS$: IFA$=""THEN282 

IFAS= "gl" THEN2O6 

60T0282 

FORW=24 1 TO19SSTEP -1:POKE36877 ‚W: FORT=1T059:NEXT:NEXTW:POKE36377,0 

PRINT'IERRBBPEIT : "TIs 

GOSUB1A11 

PRINT'EERBBBPUNKTE : "PT 

PT<Q)=PT<Q)+PT:FORT=1TO2S08:NEKT 

PRINT" WU" :GOSUB1909:PT=8 

NEXTE 

NEXTO 

PRINT "I" :GOSLUB1896:SP=6 

FORQ=1T052 :FORE=1TO2 

PRINT" Zeieieifapng HAMMERWERFEN "NASCQ):POKE138,0:WAITI98,1 

PRINT "Binlaisfsppepue LDIREHEN :PT=98:T1$="8980099"“ 

GETOS: IFQ$S=""THEN223 ’ 

IFOs< > "m" THEN223 

FORM=286T0220:POKE36877 ‚M: FORT=1TUS®:NEXT:NEKTM 
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233 
234 
235 
236 
237 
8398 
248 
241 
242 
257 
258 
259 
268 
261 
262 
558 
551 
552 
553 
554 
555 
556 
557 
558 
553 
b1=1-] 
561 
562 
563 
564 
565 
ses 
569 
578 
571 
572 
573 
574 
575 
576 
577 
578 
579 
580 
s81 
532 
583 
1890 
1901 
1022 
1883 
1884 
1985 
1818 
1011 
1812 
19013 
ı814 
1215 
1215 
1917 
1818 
1819 
1828 
1021 
1822 
19023 
ıa24 
1925 
1925 
1927 


FORN=2 18T0238: POKE36877 ‚N: FORT=1TOS@:NEXT:NEXTN 


FORO=229T0248 :POKE36377 ‚O:FORT=1T058:NEXT:NEXTO 
FORP=238T0258 :POKE38877 ‚P:FORT=1T058: NEXT:NEXTP 


POKE36877 ,0:PR INT " Zprmelelgeiin 
GETQS$: IFQ$=""THEN237 
IFQ&< > "" THEN237 


LOSLASSEN !!! 


FORM=2SOTOZABSTEP-1:POKE36877 ‚A: FORT=1TOSQ:NEXT:NEXTATPOKE36877 ,8 


PRINT’IBRBBPEIT : "TI$ 
GOSUB1@11 
PRINT'IEREBBPUNKTE : "PT 


PT{G)=PT<Q)+PT 
FORT=1T02588: NEXT 
PRINT"\":G05UB 1999 

NEXTE 

NE#TQ 
PRINT"":FORT=1T03988 : NEXT 
PRINT" IMEBISO,DAS WAR'S" 
PRINT"EBBINIR KOMMEN ZUR 
PRINT "BES TEGEREHRUNG " :FORT=1T03198: NEXT 
IFPTCAI>PTC@IANDPTCAHI>PTC3I THENGS=NASCL) 
IFPTCLI>PTCZIANDPT<CLI>PTC3SI THENGS=NASCI) 
IFPTCEI>PTCLIANDPT<EI>PT<3)ITHENGS=NASC2) 
IFPTC3) >PTCLIANDPT (3) IPT<2ITHENGS=NAS$(3) 
IFPT<2EI>PTELDANDPT<ZI<PTC3ITHENSS=NASL2) 
IFPT<2I>PT<LIANDPT<2I<PT<3YTHENS$S=NAS(2) 
IFPTCSI>PTCALIANDPT<3I<PT<C2ITHENSS=NASCZ) 
IFPTCIIIPTC3IANDPTCLIKPTCBITHENSS=NASCI) 
IFPTCEI>PTCSIANDPTCBI<PTELITHENSS=NASCZ2) 
IFPTC3I>PT<CZIANDFTC3I<PTCL>THENSS=NASCZ) 
IFPTCLISPTEZIANDPTCLIKPTCZITHENBS=NASCI) 
IFPTC3)<PTCLIANDPT<SI<PT<2ITHENBS=NASCZ) 
IFPTC3ICPTCLIANDPT<3IKPTC2ITHENBS=NAS(CZ) 
PRINT"I" 

PRINT" MI GOLD 5 
PRINT" SILBER mag 
PRINT"M44 BRONZE my: 
PRINT "IEKBBHERZL ICHEN 
PRINT "EEEBIPUNKTE :" 
PRINT"EBBI"NASCI)" : 
PRINT"BBE"NASCE2)" : 
PRINT"BBI’NA&(3)" : 
PRINT" OEBISREKORD : 
POKE1S8,8:WAIT1S3S ,1 
PRINT" RIBINOCHMAL J/N" 
GETAS: IFA&="J"THENRUN 
IFAS="N"THENPR INT" BSCHÄDE 


"Hm" 


I":END 


1028 
19023 
1838 


GOTOS81 1831 
PRINT" A NAME 1232 
BRUNO ee 1033 
FORN=1TIS2 1834 
PRINT" "NASCN>" "PTEND 1035 
NEXTN 1835 
PRINT" 1837 
RETURN 1838 
IFTI£="088120"THENPT=123 1833 
IFTI$S="888119"THENPT=136 1848 
IFTIE="008 118" THENPT=149 1841 
IFTIS= "888117 "THENPT=182 1852 
IFTI&= "888116" THENPT=175 1853 
IFTIE="882115"THENPT=188 1854 
IFTI&="009114"THENPT=281 1055 
IFTI$="889113" THENPT=214 1856 
IFTI£="808 112" THENPT=227 1857 
IFTI$S="0888111"THENPT=248 1853 
IFTI$="8909119" THENPT=253 1959 
IFTI$="888103" THENPT=266 1868 
IFTI&="840 198" THENPT=27& 1863 
IFTI£="389 187" THENPT=2932 1084 
IFTIS="080196" THENPT=385 1865 
IFTIs$= "888 18S" THENPT=318 1866 
IFT1$="8986194"THENPT=}31 1267 
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"6$:FORT=1T030989 :NEKT:H=VAL (G$) 
"S$:FORT=1T03088 : NEXT: IFPTCH) >HITHENHI=PTCH) 
"BS:FORT=1T03508: NEXT 

BSLUECKWUNSCH |}! 


"PTELISIFPTCLI>HITHENHI=PTAI) 
"PT<EIS IFPTC2I>HITHENHI=PT<2) 
"PTC3)EIFPTCS)I>HITHENHI=PT(3) 


IFTI£="009103"THENPT=344 
IFTIS 


888 192" THENP 57 
Baa1ıal"THENFT=378 
a98 188" THENP 
688853 "THENPT=336 
"888858" THENPT=483 
888057 "THENPT=422 
8008856 "THENPT=435 
989855" THENPT=448 
IFTI£="009954 "THENPT=481 
IFTIS= "899853" THENPT=474 
IFTIS="000052 "THENPT=487 
IFTI$="80095 1" THENPT=599 
IFTI$= "968050 "THENPT=513 
IFTI$= "888949" THENPT=526 
IFTI£="9993948 " THENPT=539 
IFT1$="880447 " THENPT=552 
IFTI$="089946" THENPT=565 
IFTI$= "008945" THENPT=578 
IFTI$="0093844 "THENPT=591 
IFTI$="008893" THENPT=584 
IFTI£="860942 "THENPT=617 
IFTI$="08804 1" THENPT=538 
IFTI$= "966949" THENPT=643 
IFTI$="000039" THENPT=856 
IFTI&="000838"THENPT=669 
IFT 1$5="088037 "THENPT=682 
IFTI$&="098036 " THENPT=695 
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IFT1$="090035 "THENPT=788 
IFTI$S="880034 "THENPT=721 
IFTI$="080033"THENPT=734 
IFTI$S="888032" THENPT=747 
IFTI$="888831"THENPT=75®8 
IFT1$="088838 " THENPT=773 
08029" THENPT=786 

"899928 " THENPT=739 
IFTI£="988927 "THENPT=812 
IFTIS= "000036" THENPT=825 
IFTI&="988925" THENPT=338 
IFTI$="8989024 " THENPT=351 
IFTI$="080823" THENPT=364 
299822" THENPT=877 
088021" THENPT=838 
020924" THENPT=393 
8898 13"THENPT=916 
IFTI£E="6008 18" THENPT=33& 


P=VALCTIE) 
IFPSIZATHENPT=120 
IFSP=2THENPT=PT+247 
IFSP=4THENPT=PT+837 

RETURN 

PRINTFI" 

PRINT'EBEF ww 

PRINT " za 

PRINT" ZBBKE 

PRINT" zelkKn 

PRINT" MER BER BEI m 

PRINT" ZEBEEENG Na 

PRINT" ZEMENT] HER LA bisibin 
PRINT" MEET BEI id Biapmı " 
PRINT" ZEHbBMk REN: Par! [_ 4 
PRINT"MERICUWILLKOMMEN IM VC-20 
PRINT" jUa" 

PRINT"ERKLAERUNG :" 


& PRINT" “ 


PRINT"’mAIOO M LAUF 
PRINT"MAL DRUECKEN 
PRINT"mIZG& M LAUF 
PRINT"MAL DRUECKEN 
PRINT"MIUEITEPRUNG :M Fi 25 ı 
PRINT"MAL DRUECKEN,DANN F? 

PRINT"MN400 M LAUF :M Fi 4008 


:M Fi 108 


:ım Fi 288 


& PRINT"MAL DRUECKEN 


OKTOBER 1984 


PRINT"WSEPEERLIERFEN :ı Fi 25 
PRINT"MAL DRUECKEN,DANN F? 
PRINT" B@HAMMERWERFEN: I EINMAL 
PRINT"F1,DANN F7 

PRINT" MeASSACHTUNGEE JE SCHNELLER 
PRINT"SIE Fi DRUECKEN,DESTO 
PRINT"MEHR PUNKTE GIBT'S I" 
POKE198,8:WAIT193,1 
FTELISGEPTI2)=B:PT(3)=0 

RETURN 


IFTIS="800817"THENPT=342 

IFTIE= "8888 16" THENPT=355 
"88815" THENPT=3883 
"386814" THENPT=381 
"280013" THENPT=334 

IFTI£="239898 12" THENPT= 1997 


88023" THENPT=1946 


239908" THENPT=1959 
898987 "THENPT=1972 
8900806" THENPT=1985 
988885 "THENPT=1933 
8993984 "THENPT=1111 
IFTIS="080883"THENPT=1124 
IFTI: GO0032"THENPT=1137 
IFTI£="838881"THENPT=1153 
IFTIS= "800858" THENFT=S19 


SLYMP IASTADION...":POKE198,0:WAITIIS,1 


Homecomputer 51 


Spielregeln: 

Sie schlüpfen in die Rolle eines Lang- 
streckenläufers, und müssen, je nach 
Bedarf und Kondition, eine oder 
mehrere Runden im Stadion in mög- 
lichst kurzer Zeit laufen. Nach dem 
Startschuß erscheint er in der linken 
oberen Ecke des Stadions auf der Lauf- 
bahn als blinkender Punkt, den Sie 
dann durch vier Funktionstasten durch 
wiederholtes Drücken steuern. Nach 
dem Startschuß beginnt die Zeit zulau- 
fen. und Sie sollten sich in Lauf- 
richtung (nach rechts) auf den Weg 
machen ohne Zeit zu verlieren. Die ei- 
gentliche Schwierigkeit besteht darin. 
vor den Richtungswechseln die bis 
dorthin noch benötigten Schritte abzu- 


18 
12 
14 
16 


PRINTCHRS$< 147) 
GosuBsaaa 
1=9:G0SUB3898 

POKEV+4 ,156:POKEV+5,75 


'Lauf 6 


. für den C-64 


schätzen. Zuviel oder zuwenig ge- 
machte Schritte kosten wertvolle Zeit. 


Belegung der"Funktionstasten: 
Fl: rechts 

F3: unten 

F5: links 

F7: oben 


Programmaufbau: “ 

Z.16-300: Aufbau des Spielfeldes und 
der Laufbahn 

Z.332-338: Startschuß 

2.510-775: Belegung der Funktionsta- 
sten und Kontrolle des Cursors 
Z.7000-7340: Erläuterungen 
Spiel 

Z.8000-8290: Aufbau des Titelblocks 
Z.8292-8307: Aufbau des Sprites 


Variablenliste: 

I: verstrichene Zeit 

X: momentane Position (horizontal) 
Y: momentane Position (vertikal) 
DX: Bewegungsrichtung (horizontal) 
DY: Bewegungsrichtung (vertikal) 

S: gelaufene Runden 

O: eingegebene Rundenzahl 


zum 


Anmerkung: 

Um das Programm um ca. 6% schneller 
zu machen, kann vorher der Befehl 
“POKE 53265.PEEK(53265) und 239” 


113 
119 
128 
1ie2 
125 
139 
135 
198 
145 
150 
155 
168 
165 
178 
175 


FORM=1866T011®1 
POKEM, 195 
NEXTM 


FORN=55338T055373 
POKEN,® 

NEXTN 
FORV=11A3T01983STEP48 
POKEV,194 

NEXTV 


POKEH,3 

NEXTH 
FORP=1985T02922 
POKEP, 195 
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FORH=55375T056255STEP48 


18 PRINT" EI I — y i 
22 PRINT" IE -=SMÄSTART/ZIELWA | BLAUFRICHTUNG: er (ie RE NE 
22 PRINT"AI IE j IR" 

24 PRINT" IM ] RI“ 

26 PRINT"AI IM ı Lie 

28 PRINT"ZI IE j IR" 

S® PRINT" IE j IR" 

s2 PRINT" IM u [| 7} umau m u 

34 PRINT"SI IM u SUGU BU 

36 PRINT"AI IM 3u 1] u um m 7} 

38 PRINT" I u ZuUGU um ai 

48 PRINT"AI IE | u auau m u au 

42 PRINT" IE sau II" 

44 PRINT"AI IM Zn 3 ua url" 
46 PRINT" IE = Im ı 1a 1 I IR" 
48 PRINT"AI IM zo 3 von IR" 
S@ PRINT"I IM en una RI" 
52 PRINT"AI IN [Te Tr IR" 
54 PRINT" I — ua RI" 
56 PRINT"AI IE l iR" 

58 PRINT"AI IE l [150 

188 PRINT" IUO-— 1 

185 PRINT" am — ” 

187 POKE1163,81:POKES5435,9 


POKE 183,194 :POKES55355,9 
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FORJ=56255T056294 
POKEJ,S 
NEXTJ 
FORY=1025T01962 
POKEY,195 
NEXTY 
FORU=55297T055334 
POKEU,9 
NEXTU 
FOKE 1924 ‚213:POKESS296 ,9:POKE 1964, 194:POKES5336 ‚3:POKE 1863,2@1:POKES5335 ,3 
POKE 1984 ‚202: POKES6256 ‚9:POKE2823 ‚283: POKES6285 ,3 
POKES328@, 12:POKES3281,1 
Keityal 
Dx=1:0Y=1 
FORMK =@T029898 : NEXTMK 
S1=54272:FL=SI:FH=SI+1: TL=S1+2: TH=SI+3:W=8I+41M=SI+S:H=SI+G:L=81+24 
FORQQ=1STOBSTEP-1 
POKEL ‚QG:POKEN , 18:POKEH,, 15:POKEFH,48:POKEFL ‚288: POKEW, 129 
NEXT 
POKE 1163 ,288:POKESS435,,5: FORSH=ATOS® :NEXTSH:POKE1163,194:POKES5435 ,5 
POKEW,Z:FOKER,® 
IFS=CTHENGOTOSEBO 
POKE1195 ,222:POKESS377 ,3 
POKE 192 ,2O1:POKESS374,9 
PRINT'EIRBRRREPEPPRSBEEETTIYIILIIIIIIIIITIIIIIIPEIT:": I 
POKE 1982 ‚2083: POKES63S4 ,9 
POKE 1945 ‚202: POKESS2 17,9 
POKE 1085 ,213:POKESS337 ,3 
FPOKELABS+K+4A%HY,87:POKESS2IT+N+4@KY,9 
IFH>37THENK=37 
IFTIBETHENY=ER 
IFXCLTHENN=Q 
IFY<ETHENY=1 
POKE 1025+%+40%Y, 195 
GETA$: IFA$= "MW" THENY=Y+DY 
IFA$= "Bi" THENX=X+DX 
IFA& THEN®=X-DX 
"THENY=Y-OY 
IFPEEK ( 1085+X +4QXY ) =BB2THENR=S: GOSUB2BBA 
IFPEEK ( 1825 +X+49#*Y) = 1937 THENY=Y-DY 
IFPEEK ( 1O2S+X+4QxY) =2 12THENX=K-DX 
IFPEEK ( 1D25+X+4@xY ) =2O9THENX=X+0X 
IFPEEK ( 1025+%+49%Y)=138THENY=Y+DY 
IFPEEK ( 1O25+X+4QxY)=2@1THENY=Y+OY 
IFPEEK ( 1025+X+49xY) =BASTHENX=K-DX 
IFPEEK ( 1025+8x+40xY) =2Q2THENY=Y-OY 
IFPEEK ( 1O25+X+4QxY) =213THENX=X+DX 
s0SUBaaa 
GaTıssa 
I=141 
RETURN 
' S=R+1:PRINT "WERBEITRUNDE " 7S: RETURN 
PRINT"IBMOECHTEN SIE DIE SPIELREGELN ? «J/ND” 
GETFC#$: IFFC$="J"THENTORO 
IFFCS< > "N"THEN3Q10 
PRINTCHRS< 147) :POKES3288 ‚2: POKES2281 ,8 
PRINT"ERBBANIEVIELE RUNDEN MOECHTEN SIE LAUFEN ?": INPUTO 
IFO=2THENPRINT"WEBEIN BISSCHEN MEHR SPORTLICHER EHRGEIZ" 
PRINT"BEITTE" 
IFO=AORO<ATHENS11A 
IFO< >INT<OITHEN310Q 
1FO< >ATHENFORGE=QTOSARA:NEXTGE 
RETURN 
FORK =ATO2SAR:NEXTK 
PRINT REETEEIOLLEN SIE NOCH EIN PAAR RUNDEN DREHEN 7?" 
GETWS: IFWE=" 1" THENI=9:8=0:G0TC14 
IFINE< >" N" THENS1AQ 
FRINT"EEBIICH HOFFE ‚DAS SPIEL HAT IHNEN GEFALLEN? I "END 
POKES32281 ,8:POKES3280 ,1 
PRINT EEE Hr SPIELREGELN Krk" 
PRINT"OEEEBISIE SCHLUEFFEN IN DIE ROLLE EINES" 


„=. .nanunnsnanenonnnenonnunnnennnen 


© 
© 
® 
io 
® 
® 
® 
© 
® 
@ 
® 
© 
® 
® 
® 
® 
® 
® 
® 
® 
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GDONSNSANSNSNINANNSNAININ 


by] 


= 


JUN WM MI) MM TI MM EM nn re 
SND- HDDNDMNPWN- DON WW 


N 
3999529999599 9399095999999 


N L& 


PRINT" EBBB.ANGSTRECKENLAEUFERS UND MUESSEN," 
FRINT"BBBRE NACH BEDARF UND KONDITION, EINE" 
PRINT"BBRIDEF MEHRERE RUNDEN IM STADION" 
PRINT" BBBIIN MOESLICHST KURZER ZEIT LAUFEN." 
PRINT'EBBBINACH DEM STARTSCHLUSS ERSCHEINT ER" 
PRINT"EBBBIIN DER LINKEN OBEREN ECKE DES" 
PRINT"EBBBETALIONS AUF DER LAUFBAHN ALS" 
FRINT"MBRBLINKENDER PUNKT, DEN SIE DANN" 
FRINT'BBRSIIT TEN VIER FUNKTIONSTASTEN 
POKE123,Q:WAIT1I98,1:POKE193,9 

POKES3ZSA 5S:POKESSZEI,I 

PRINT" IEBBIDLIRCH WIEDERHOLTES DRUECKEN STEUERN. " 
PRINT"EBBINACH DEM STARTSCHUSS BEGINNT DIE ZEIT" 
FPRINT"BBEU LAUFEN UND SIE SOLLTEN SICH IN " 
PRINT"EBBILALFRICHTUNG “NACH RECHTS? AUF DEN" 
FRINT’ERBRJES MACHEN OHNE ZEIT ZU YWERLIEREN." 
PRIMT"EBBNIE EIGENTLICHE SCHWIERIGKEIT BESTEHT" 
PRINT"MBNARIN, VOR DEN RICHTUNGSWECHSELN DIE" 
PRINT"EBBEIS OOFTHIN NOCH BENOETIGTEN SCHRITTE" 
PRINT"BBBEZUSCHAETZEN.ZUVIEL ODER ZUWENIG GE-" 
PRINT"EBBIMACHTE SCHRITTE KOSTEN WERTVOLLE ZEIT. 
PRINT'"IREPRPPPPPPRPPPRBIMTASTEM" 
POKE193,2:WAIT138,1:POKE198,8 
POKES32S1,14:POKES32SR,1 

PRINT OEDBELEGUNG DER FUNKTIONSTASTEN" 
PRINT 
PRINT" | =RECHTS 

PR INT" EEERBRPBPBPBRRPPBBLFSE=UNTEN 

PRINT" REERBRRRRPRPRBBPPRLSFSE=L INKS 

PRINT" GEIRPPPRPPPPPPPRBRLFT7E=OBEN 

PRINT" ERIC UND NUN 'GUT LAUF '" 
PRINT" @BERPPPPPPPRPRRBBEIZTASTEM" 
FOKE198,98:WAIT198,1:POKE198,8 

G0oTo31aa 

POKES3289 ,8:PCKES3281,8 

FORZ2=1924T01863 

POKEZZ ,81 

NEXTZZ 

FORKA=SS2I6T0O55335 

POKEXX,E2 

NEXTX* 

FORCC=1864T01944STEP49 

POKECC ‚81 

NEXTCG 

FORVV=55336T056216STEP48 

POKEVV,S 

NEXTVYV 

FORBB=11A3TO1983STEP48 

POKEBB ‚81 

NEXTBB 

FORNN=55375T056255STEP4@ 

POKENN,® 

NEXTNN 
FORMM=1984T02923 
POKEMM,8S1 

NEXTMM 
FORAA=56256T056295 
POKEAA,S 

NEXTAA 

PRINT " Bpıpapı elejes 
PRINT "ERBRBRBPES+ 


999.99 99% v..er" 
„+++ EZ +" 
PRINT ' ERBREBBIS+ 9099.94 99% v0" 
PRINT "ERERBRBPES+ »v0 ++ ++ +" 
PRINT"BRRRERBII044 9 9 904 + +. +" 
4=53248:POKEV+37,1:POKEV+38,9:POKEV+41,8 
POKEV+28,4:POKEV+21,4:POKE2942,13 


=@ POKESE115,1 


S FORIJ=SOTOSAA:NEKTII 


SE FORLL=-OTOSAAN:NEHTLL 


BUTASTEmM" 


DATA12,2,9,12,1,9,9,3,8,8,3,192 
POKE 1842,22 
POKE1842 ,22 
POKES6114,1 
POKE 1843,15 


POKE 1844,14 
POCKES6116,1 
FORGG=0T0598 :NEXTGG 
POKE1916,13 
POKES6188,1 
FORFF =DTOSBR: NEXTFF 
FOKE1918,46 
FOKESE1S9,1 
FORHH=3T0598 : NEXTHH 
POKE 1329,11 
POKESS192,1 


POKE 1322,21 
POKESE194,1 
FORKK=DTOSAZ : NEXTKK 
POKE 1924,13 
POKESE136,1 


POKE1926,13 
POKES6198,1 

FORPP =aTOSAR@: NEXTPP 
PCKE1923,5 
POKESEB2ZDA,I 
FOROG=OTOS9A : NEXTOO 
FOKE 1332,13 
POKESEEAE,1 
FORUU=ATO2ZABR:NEXTUL 
POKEY+4,1 

FOKEV+S,A 

RETURN 


FORMN=@TOB2 :READLQ : POKE832 +MN,LQ:NEXT:POKEV +4 ,55:POKEV+5,145:FORVB=8T0159 


POKEV+23,4:POKEV+29,4 

POKEY+4 ,VB:POKEV+4 ,VB:NEXTVB 
DATAA,@,0,0,8,0,0,8,0,8,0,8,80,0,0,8,8 
DATRO,9,69,0,9,56,0,9,58,9,9,56,0,8,20,8,8 
DATA152,0,2,24,9,2,22,0,9,298,128,8,152,80,13,138,8 


HOoMECOMPUTER 


OKTOBER 1934 


Imbiß 


für den Commodore 64 


Das Spiel IMBISS stammt aus dem Heft ”HOMECOMPUTER” 8, und ist ursprünglich für den 
Apple-Computer, wurde aber für den Commodore 64 umgeschrieben. Ziel des Spieles ist es, mit 
einem Startkapital von 10 DM in einer bestimmten Anzahl von Wochen möglichst viel Kapital zu 
machen. Das ist jedoch nicht so einfach, da die Großhändler ja auch etwas verdienen wollen und die 
Kunden nicht so kauffreudig sind, wenn Sie Ihre Preise hoch ansetzen. 


REM IMEISS BY OLIVER SCHWALD 
DIN%C935:T=1 :T$="MONTAG" K=1990: TE=15: PRINT" 
LEGE IRÄRAENRAÄKRARNENRNRÄRNENENE" 
FÜKES3288, 9: POKES3231,8 
REM AD sa AULD ZEICHNEN Programmteile: 
FRINT"I 10-30: Initialisieren 
ER EL RL RRINTSRIENE 40-250: Imbißstand zeichnen 
© PRINTTABCSI" 2 300-820: Lagerbestände anzeigen 
NEAT 910-1240: Waren einkaufen 
FOKE214,3:PRINT:PRIHT 1270-1370: Preise ändern 
ERTNTEHBCIOST n RE. Mm ui u" i 1380-2330: Verkaufen 
PRINTTABCL@S" MI IM Mh " : - 
PRINTTABE LAD" MEET PT der Ergebnisse 
PÜKE214, 7:PRINT:PRINT SDPISanleltumg 
FORK=1TOS 

2 FRINTTABCHDÜNGL Li 

NEXT 

FRINTTARC9Y" 36 e" 

IFA=-1THENRETURN 

PRINTTABCFI"MACCH 1934 BW OLIVER SCHWALD" 

FÜRX=1T03088 : NEXT 

PRINTTABCTI"d  SPIELANLEITUNG CJEND 7 " 

GETOS 

IFQ$=" J"THENA=-1:G0T02548 

IFO$<C>"N"THEN218 

PRINTTABCFI"IEI 

PRINT" SMISMIEVIELE WOCHEN MOECHTEN SIE" 

INPUT" WMARBEITEN" ; ZU 

IFZW< LORZWPSOTHENZ23O 

REM %# BILDSCHIRMAUSGABE #%* 

PRINT" 

PRINT" MITA: TEMPERATUR: " 

PRINT" WUKRSSENINHALT : " 

PR I NT MINARENVORRAT : VERKAUFSPREISE" 

PRINT —— 

FRINT"M SCHOKOLADENEIS: STUECK %* 

PRINTÖM VANILLEEIS —: STUECK # 

PRINT"M ERDBEEREIS  : STUECK  %* 

PRINT" M COLA FLASCHEN # 

PRINT"M ZIGARETTEN * 

FRINT"M ERATWUERSTE : * 

PRINT" M POMMES FRITES : * 

PRINT") 

GOSUB718 

IFT=6ORT=7THENSEO 

PRINT"SMDECHTEN SIE EWAS EINKAUFEN 7 

GETOF 

IFA$=" J"THENGOSUBI1A: GOTOSSO 

IFOS<C>"N"THENS20 

GOSUB71R 

FRINT"ANMOECHTEN SIE IHRE PREISE AENDERN 7 

GETO$ 

IFO$=" J"THENGOSUB1230:60T0598 

IFOSCH"N"THENSER 

GOSUB1299 

T=T+1: IFT=STHENT=1 :W=hW+1 : IFW=ZWTHENZ43B 

IFT=1THENT$="MONTAG" 

IFT=2THENT$="DIENSTAG" 

IFT=3THENT$="MITTWOCH" 
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IFT=4THENT$="DONHERSTAG" 
3 IFT=5THENT$="FREITAG" 
IFT=&THEHT$="SAMSTAG" 
IFT=?THEHT$="SONHTAG" 
21=-9:22=40: G0SUB1268: TE=Z 
GOTI358 
PRIHT" AM" TABAS>T$ 
FRINT" SB" TABC3E TE" er 
FEINT"M"TABE 13)" 5 
PRINT" MER" TAB«. LEOWITABCBED" 
FREINT"M"TABCLEDMZTARC3EI"N 
FREIHT"M"TABELEPW3TRBE3SH" 
FRINT"M"TARÜLS>PM4TABE 6 LEG I} 
38 PREINT"B"TABELSSNSTABE m" Yy5' 
FRIHT"M"TARCIEMSTABS una" 5" 
FREIHT"M"TABE LE>NFTABE 36 N 
RETURH 
REM #* WAREH EINKAUFEN 
GOSUPFIR 
21=19:22=48 
IFTE>STHENZ1=20:22=45 
IFTE>1STHENZ1=30: 22=50 
IFTE>1STHENZ1=48: 22=658 
IFTE>ZBTHENZ1=48: Z2=78 
IFTE>SÖTHENZ1=50:22=30 
IFTE>35STHENZ1=88:22=108 
IFT=5STHENZ1=21+15:22=22+15 
GOSUB1258:H1=2: G0SUB1268 :H2=2 :G03UB1268 :H3=2:G0SUB1268: H4=Z+18 
SOSUR1250:H6=159-2 :G03UB1268:H7=170-2:21=4: 22=3: G05UP1269:H5=2%#58 
PRINT" WIEVIEL SCHOKOLADENEIS ZU "HL"PF "5: INPUTE:GOSUB2AB 
a IFEXH1>KTHENIESG 
Wis HE: E=K-CHI#E)GOSUBFLE 
FEIHT"# WIEVIEL WANILLEEIS ZU "H2"PF ";: INPUTE :GOSUB3ARR 
IFE#H2>KTHEN1068 
WEZ=WUE+E K=K-CH2H#E) : GOSUBT1O 
PRINT"A WIEVIEL ERDBEEREIS ZU "H3"PF ";: IMPUTE : GOSUB3E88 
IFEXH3>KTHEN1E98 
W3=WU3+E: K=K-CHS#HE) GOSUB7LE 
PRIHT"S WIEVIEL FLASCHEN COLA ZU "H4"PF "5: INPUTE:GOSUB3AGR 
IFEXH4>KTHEN1 120 
W4=bl4HE :K=K-CH4HE) :GOSUB71R 
PRINT" WIEVIEL FRCK. ZIGAR. ZU "HS"PF"; : INPUTE :GOSUB3008 
IFE#HS>KTHEN1158 
WS=WS+HE :K=K-CHSHE) : GOSUB71R 
FRINT"S WIEVIEL BRATWUERSTE ZU "HE"FF "5: INPUTE:GOSUBSAAR 
IFEXHE>KTHEN1188 
WE=llS+E : K=K- CHSHE) GOSUB71R 
PRINT"# WIEVIEL TELLER FOMMES ZU "Hr"PF ";: INPUTE:GOSUB3QB8 
IFE#H7>KTHENI1210 
W7=UF+E:K=K-CH?#E}  GOSUR?1D 
RETURH 
REM *# ZUFALLSZAHL ## 
Z=<INTÄRNDELSRCZZ-Z13 +21) RETURN 
BEm *# PREISE EINGEBEN **_ 
GO5UE718 
FRINT"#FREISE EITTE IM SPFEHNIGEN®@ ANGEBEN !":FOR#=1T02AAB : HEHT: GOSUB3HHB 
INPUT" SSCHOKÖLADENEIS "5Y1:G05UB3088 : GOSUF718 
INFUT"SYANILLEEIS "; v2: G0SLUE3008 : GOSUB719 
INPUT"SERDBEEREIS " ACH GOSUB3998 : GOSURFIE 
INPUT" SLOLA ";V4 : GOSUBSAHG : GOSUB?18 
INPUT"SEIGARETTEN "WS: G05UES9A8 : GOSUB?18 
INPUT"SERATHURST "5V6:GOSUB3998 : GOSUE?1H 
INFUT"SPOMMES FRITES "34V GOSUB3BAR:GOSURFIA 
& RETURN 
REM %#* KUNDEN SIMULIEREN ## 
EK=30:EK=19:ZK=18 
IFT=6THENBK=48:EK=15:2K=13 
IFT=7THENEK=48: EK=26: ZK=15 
YE=Y4/1: IFVEPZVWZTHENVE=SVZ 
IFYEZWSTHENVE=Y3 
EE=EK-INTCVE/LO} 
YB=YS:IFYBSYFTHENYESYT 
BK=BK-INT(YB/205 
2u.=ZK-IHTCS7100) 
EK+INT£TE/Z3 :EK=BK-INTSTEFZ> 
:BOSUBSO 
FRINT"S IHR IMBISS DEFFHET DIE ROLLAEDEN!" 
FOR =16T0 S5TEP-1 
a: FÜREZ14,#: PRINT 
1538 : FRINTTABEIH "Re 8" :FRIHTTAELSH" 
1535 : FÜRD=1T0208: NEXT 
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HEAT 
PRIHT"; 
Ak=ZK 


FORU=1TOAK : GOSUB 1638: GOSUB2328 NEXT 
5 RETURN i 


:IFZ=2THENS=2 


Yl-h 758 
IFYL-V3>ZOTHEN1848 
GOSUB2198 
FRINT"SKUHDE : CHOK 5 BITTE !" 
E EK-1: 50101758 
TZTE" :K=k+CW1EW 13 M1=0:EKSEK-1: 60701758 


BSTHENIE48 
GSOSLUES1AB 
FRINT"SKUNDE: "5" YANILLEEIS BITTE I" 
THENPR INT" MAUSYERKAUFT" EK=EK-1:50T01758 
h DAS LETZTE" KSK+CW2#W 2 ME=BEKSEK-1: 60101758 
4-1:G0T01758 


HEH12GE 
“L>ZBTHENIETA 
Z>28THEH1FEA 
[u] 


3 } VERKAUFT" EK=EK-1:GOTO1758 
1308 KSTH [ IST DAS LETZTE" K=K+CW3#V33 W3=B EK=EK-1 160701758 


u 


»3" GOLA BITTE. I" 
ATHENFRIHT" AUSVERKAUFT" EK=EK-1: 60101758 
4THENFRINT"MDAS IST DAS_LETZTE" KSK+cN4EV45 Nd=REK=EK-1:GOTD1758 
H4=hld K+sS5#V4 5: EK=EK-1:GOT01759 
IFZE=ÖTHEN1538 
GUSUBS1aR 
FRINT"SKUNDE: "3" SCHACHTEL ZIGARETTEN " 
IFWS=ÖTHENFRINT" AUSVERKAUFT" :ZK=ZK-1 60101758 
2aac IFSPUSTHENPRINT"MDAS IST DAS LETZTE" :K 'WS=8: ZK=2ZK-1:G0T01758 
old 2 $ - 


IFVE-Y7>39THENZ2038 
GOSUES1OG 
PRINT" SKLHNDE: 
:SOTO1758 


PRINT" MDAS IST DAS LETZTE" :K=K+cl6#V65) :W6=R: BK=BK-1:G0T01758 
zus I ’ #46): BK=BK-1:GOTD1758 
2934 
2188 
2118 IFV?-VE>ZBTHENZBZB 
2115 GOSUE3108 
2125 PRINT"SKUHDE: "5" TELLER POMMES BITTE !" 
2138 IFW?=ATHENPR INT" MAUSVERKAUFT" : EK=BK-1: 50101758 
2140 IFS>UFTHENFRINT"MDAS 15T DAS LETZTE" :K=K+cU7&V7 5 :U7=B: BK=BK-1:G0T01750 
2158 17-5: K=K+05#475 BK=BK-1 60701758 
2155 GOSLIB3108 
2122 RETURN 
2328 PRINT" SM" TAR©14)"TEMP.="TE" 0"; 
2328 RETUFH 
2438 PRINT"TII" 
2448 FRINT'MEBIMSIE HABEN ES IN "ZU"MOCHEN GESCHAFFT," 
2458 FRINT"MIHR KAPITAL VON 18 AUF "K/1aR" DM ZU" 
& FRINT"MERHDEHEH. " 


ITHEHPRIHT" MD 15T EIN WOCHENLOHN WON "UL" Dm." 
ÖTHENFRINT"MSIE SIHD DER PERFEKTE “TANTE EMMA“ LADEN" 
ERÖTHENFRINT"MSIE SIND NICHT SCHLECHT" 
SETHENFRINT"AMÄHN KANN’S Ni SCHLECHTER MACHEN!" 
SLTHENPRINT"MICH WILL JA HICHTS SASEH ABER ..." 
a FRINT"MÖOLLEN SIE ES HOCH EIMMAL VERSUCHEN 7" 
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EHD 
FRINT"194 


PRIHT"MO 


PRINT" MM 
FRINT" 
FRINT" 


GETES: IF: 


FEIMT"S 
FRINT"S 
FRINT"M 


für den TRS-80 


Ziel des Spieles ist es. alle Kegel in be- 
liebig vielen Versuchen abzuräumen. 
Die Anzahl der Versuche wird be- 
wertet. Wie beim echten Kegeln ist es 
verboten, den Rand zu berühren. Der 
Einwurf der Kugel erfolgt folgender- 
” maßen: 

Die Kugel saust von links nach rechts 
in einer Geschwindigkeit. die vorher 
eingestellt werden kann (1: sehr leicht, 
5: sehrschwer). Wenn man nun die"8"- 
Taste drückt. hebt die Kugel an der 
Stelle. an ersiesich gerade befindet. ab. 
Nun kann sie mit der "7"-Taste (Zeh- 
nerblock) nach links bzw. mit der "9"- 
Taste nach rechts gelenkt werden. 
Fliegt sie schräg nach oben. kann sie 
mit der "8”-Taste wieder auf geraden 
Kurs gebracht werden. 

Wenn man einen Kegel trifft, verschwin- 
det er. es ertönt ein Piepton, eine 


GETA$: IFA$=""THEN2S2S 
IFA$=" I" THENRUN 


FRINT"IST ES, 


Sur I ESLSRISHLE SETTIST UENAG 
PEINT"MSIH DIESEM SPIEL SIND SIE BESITZER EINES" 
a4 PRINT"WUERSTCHENSTÄNDES. DAS ZIEL DES SPIELES" 
IH MOEGLICHST KURZER ZEIT." 
ICHST WIEL GELD ZU MACHEN. " 
FRINT"MOAS IST ABER HUR DURCH GEHAUES BERECHNEN" 
3 FRIHT""DER FREISE MOEGLICH." $ 
FRIHT"WFOLGEHNDE UMSTAEHDE MUESSEN IN BETRACHT" 
FRINT"GEZÜGEH MERDEN :" 

TEMPERATUR 
HOCHEHTAG BZU. WÜCHEHENDE 
HAENDLERANGEBOTE A" 
PRINT"MORS EINKAUFEN IST HUR AH WOCHENTAGER" 
FEINT"MOESLICH I" 
FRINT" MACHE TASTE 84%)" FOKE19S,0 
""THEN2ESO 
PRINT" :GOTO23A 


Kegel man schon getroffen hat. 
Dieses Spiel ist sehr schwer, vor allem 
bei Geschwindigkeit 5. Es erfordert viel 
Übung und ein gutes Augenmaß. 

Die Bewertung am Schluß des Pro- 
grammes kann man auch weglassen. 
Durch die SET und IF POINT- 
Anweisungen war es nicht schwer, das 
Spiel zu verwirklichen. 


Variablenliste: 

N$: Name 

LA: Laufgeschwindigkeit der Kugel 
D: Ein Abräumdurchgang 

DU: Durchgang/Versuche 

X/Y: Position der Kugel 

A: Wert der gedrückten Taste/ 
Steuerung 

A: Punktzahl 

PU: Anzahl der geworfenen Kegel 
I: alle möglichen Schleifen 


Programmaufbau: 

2-21: Zeichnen der “Bowling”-Schrift 
durch SET 

40-70: Initialen 

100-110: Namen eingeben 

120-130: Spielanleitung 

140: Eingeben der Kugellaufgeschwin- 
digkeit E 


Anzeige links unten zeigt an. wieviel 210-230: Zeichnen des Spielfeldes 


OWLING ------ 


":RETURN 
"RETURN 


240: Anzahl der geworfenen Kegel er- 
scheint auf dem Bildschirm 

280: Abfragen der Versuche 

285: Abfragen, ob einer der Kegel noch 
auf dem Bildschirm ist 

290-330: Einwurf: Die Kugel saust von 
links nach rechts und wird auf 
Knopfdruck (8-Taste) geworfen. 

420: Der Wert dergedrückten Taste (7,8 
oder 9) bestimmt, ob die Position der 
Kugel (x/y) verändert wird (waagerecht: 
x: senkrecht: y) 

597: Bevor die Kugel gezeichnet wird, 
wird abgefragt, ob ein Kegel an der 
neuen Position der Kugel ist (IF 
POINT). Befindet sich dort ein Kegel, 
so wird die Anzahl der geworfenen Ke- 
gel um l erhöht (Zeile 240). Es ertöntein 
Piepton (OUT). 

598: Es wird abgefragt, ob die Kugel 
den Rand berührt hat. 

600: Die Kugel wird gezeichnet 
(SET). 

700: Wenn alle Kegel getroffen sind. be- 
ginnt das Ganze von vorne (NEXT). 
800-860: Auswertung der Punktezahl 
1000-1200: Aufforderung zum. wie- 
derholten Spiel. 


DRI= 5 TO 3035ET(0,I)3SET(9, II SETCASYIISSET(Z4,I) ISETC30,I)LSET(44,L)SSET(SO 


„I)sSET(66,I):SET(72, I) SSET(7BALISSETCBA,IISSETC9O»I)SNEXTI 
FORI=0 TO 9%SET(I»15)3SETCI»30) NEXTI 
FORI=S TO 93SET(I»22)$NEXTI 
FORI=15 TO 2438SET(I»15)SET(I»30) NEXTI 
FORI=30 TO 443SETCI»30):NEXTI 
FORI=24 TO 304SET(37+I) 3NEXTI 
FORI=50 TO 603SET(I»30)3NEXTI 

FORI=72 TO 783SET(I»15)$NEXTI 

FOR 8 TO 843SET(I»30):NEXTI 

FORI=90 TÜ 100°SET(I»15)5ET(I»30)SNEXTI 

FORI=23 TO 30%3SET(100»,I)$NEXTI 

FORI=94 TO 10035ET(I,23) 3NEXTI 

FORI=0 TO 1003SET(I»13)3SETKI»32) $NEXTI 
; FORI=1 TO 35003NEXTI 

CLs 

\ 


'COFYMRICHT 
"VON DANIEL HAENLE 
"1983 


FORI=320 TO 3463 FRINT@I»" GESCHRIEBEN "}NEXTI 
FORI=384 TO 413? FRINT@I»" VON*SNEXTI 
FORI=448 TO 4753 FRINT@I»® DANIEL"SNEXTI 
FORI=S12 TO 539: FPRINT@I»" HAENLE*"SNEXTI 
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97 FORI=1 TOZ000:NEXTI 

100 CLSSINFUT"GEBEN SIE IHREN NAMEN EIN I"3N$EIFN$=""THEN N$=°MR, INKOGNITO*® 

110 FRINT"SCHOEN» "5N$5" WIR FANGEN AN ı® 

115 FORI=110750 $NEXTI 

120 ELSSFRINTSFRINTSFRINTSFRINTIFRINT"SIE MUESSEN VERSUCHEN»ALLE NEUNE ZU WERFEN 


IST DOCH GANZ EINFACH, ODER 7" 

125 FRINT" 

130 FRINT"MIT DER 

RADEN KURS», 

MIT DER '7'-TASTE STEUERN SIE DIE KUGEL NACH LINKS» 

MIT DER '9'-TASTE NACH RECHTS® 

140 PRINTSINFUT "LAUFGESCHWINDIGKEIT DER KUGEL (1-5)"5LASIFLA>S OR LA<i THEN 140 
200 FORD=1T03 . . 

205 FU=0$CLS 

22 FORI=0 TO 17 1SETCBOHTDISETCBLVIIISETCBPFIISBETCBZVIISSETCHOJLSTSETCRBFTIENEX 
220 SET(60,2) SET (65,2) 3SET(55r2) »SET (50,2) 3SET(70,2) 

230 SET (66,5) 3SET(60 15) SET (54,5) 3SET(60 18) 

240 FOKE16320,PU+48 

280 DU=DU+1 

285 IFP TNTK6B 2 ORFOINT (657 2)ORPOINT(5572)ORPOINT (50 »2)ORFOLNT (70 ,2)ORPOLNT (66, 
SIORFOINT (60 ,S)ORFOINT(54,5)ORFOINT (60,8) THEN290 ELSE 800 

270 FORX=33T087 STEF LA 

294 Y=47 

295 SET(X,Y) 

300 E 

305 

310 

315 

320 RESET(Xr47) INEXTX 

330 GOT0O290 

400 A$=INKEY$SIFA$=""THEN415 

410 A=VAL(A$) 

415 ' 

420 IFA=8 THEN Y=Y-13RESET(XrY+1) 1G0T059$ 

430 IF THEN X=X-14Y Y-13RESETCX+1, Y+1) 1 G0T059% 

440 IF A=9 THEN X=X+1} 13RESET(X-1, Y+1)G0T059 

597 IF FOINT (XvY) THEN FU=FU+1}FOKE16320 ,FU+4830UT255,50 t0UT255,0 
5398 IFX“34 ORX>B6THENFRINT"SIE SIND AN DEN RAND GEKOMMEN !"3G60T0870 
599 IFY=1 THEN 280 

600 SET(X»Y)FGOTO400 

700 NEXTD 

800 CLSSFRINT*ERAVO, "3N$F",SIE HABEN ALLE NEUNE GEWORFEN ! 

801 INT"FUNKTEZAHL "> (DUX10) 

804 FRINT"'-=-= 

805 A=(DUX10) 

808 IFA=60 THEN FRINT"GIGANTISCH! WUNDERBAR! SFITZE! FHANTASTISCH! OFTIMAL! AUSG 
EZEICHNET! ERAVO ERAVISSIMO! LASS DICH UMARMEN !* 

Bil IFA=80 THEN FRINT"FIDEUUHEIRASSA FIDERALLALLA U 

813 IF 0 THEN FRINT"NICHT UEBEL!* 

816 IFA=100 THE 


I" 
‘ FRINT'LSS MAL. DIE GUTEN "RAN I* 
N FRINT"KNICK IN DER OFTIK »ODER ?* 
‘ FRINT"SOLL. DAS EIN WITZ SEIN ?" 
FRINT"SFASS BEISEITE !* 
FRINT*"LASCHE LEISTUNG !* 
FRINT"MANN WIRD HALT ALT »* 


THEN FRINT*CKOTZ!) KEIN KOMMENTAR I" 
0 THEN FRINT"SAGENHAFT I* 
1T04900 3 NEXTI$DU=04NEXTD 
CS 
FRINT"NOCH EIN SPIELCHEN ? (J/N)® 
C$=INKEY$SIFCH=" "THEN1020 
IFC$=*" J"THENZ00 
IFCS="N"THEN 1100 
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SABOTAGE 


für den Apple Ile 


Sabotage ist ein schönes und grafik- 
starkes Spiel, das die Spielhandlung vom 
Tip “Space-Invaders” reizvoll variiert. 
Keine Raumbasis sondern lediglich einen 
kleinen Raketen-Stützpunkt gilt es zu 
vernichten. Lastwagen versuchen, diese 
Flap-Station mit Geschossen zu versor- 
gen. Also muß man die zunächst mal 
bombardieren. Dann werden die An- 
strengungen immer größer.... 

Das Spiel erklärt sich selbst und bedarf 
somit keiner weiteren Beschreibung. 


Programmaufbau 

70-99: Anweisungen 

100-605: 1. Stufe 

610-700: Bewegungen Flugzeug 
710-740: Bewegungen Lastwagen 
750-880: Bewegungen Flab 


890-970: Bewegungen Bombe 
980-1110: Explosion Bombe (am 
Boden) 

1120-1320: Explosion Flab, Lastwa- 


gen 
1330-1700: 3. Stufe 

1710-2320: 4. Stufe 

2330-2770: 2. Stufe 

2780-3040: Hintergrund 

3050-3160: Anzeige zwischen den 
Stufen 
3170-3580: 
3590-3670: 
3680-3750: 
5000-5040: 
6000-6290: 


Einleitung 

Ende des Spiels 
Explosion Stützpunkt 
Pausen 

POKE (Shapes) 


HOME : TEXT 
GOSUB Hund 
FOKE 232,72: 
HOME = PRINT 
GET A&+ 

IF AS = N" 
IF A$ & 
REM 
HOME 


FOKE 


2 ge 


VETZFUNKTE 
PRINT 
ICHBAR. 


ALS 
ALS PFILOT" 
DARAN HINDERN " 
ABER AUFGERASST I" 

SST ES DIE RICH- 

IE IN DER ZWEITEN" 
PRINT. 
DER DRITTEN 


FRINEF -"MUE 
DES STUETZFUNE-" 


TIEFEN 


60 HoMEcoMPUTER 


HTAB. 14: 


PRINT "EINES DÜFFELDECKERS MUESSEN SIE IN DER 
PRINT. "DASS SIE IHRE RAKETEN ABLHEFERN, 
FRINT "WENN SIE DEN SIENALTON HOEREN, 
TUNG AENDERN SONST. . 
FRINT "DER TROTZ IHRER. BOMBEN ENTWISEHT „ERGIEF 
"STUFE AUSWEICHEN HUESSEN„ BIS SIE YON. 


N SIE MIT EINEM FALLSECHHRM Ab 


HHHIHH 


F 


ge 


en 


=: 


IHTINNUNIT 


Variablenliste: 

FL: Anzahl Leben 

X1,Y1: Koordinaten Flugzeug 

X2,Y2: Koordinaten Lastwagen 
X3,Y3: Koordinaten Männchen 
X8,Y8: Koordinaten Männchen 
X9,Y9: Koordinaten Rakete 

XA,YA: Koordinaten Flab 

XB,YB: Koordinaten Bombe + Explo- 
sion 


VTARB 10: FRINT 


113 


"MOECHTEN SITE ANWEISUNGEN 7 G7NI”" 


THEN. BOTO 100 
THEN 45 
*%% ANWETSUNGEN Kt 


FRINT "BEI DIESEM SFIEL MUESSEN SIE VERSUCHEN :80 VIECE FEINDEICHE ST 
MOEGLICH ZU ZERSTOEREN" 
"DIE VERNICHTUNG EINES STUETZFÜNKTES IST 


INDEM 


EN DAS= 


"MOMENT: BITTE. „u. 


VEBER VIER STUFEN ERRE 
ERSTEN. STUFE LASTWAGEN | 
‚SIE SIE BOMEARDIEREN, 

FEBE VON SICH BIETJBEI- 
LASTWAGEN, ä 
EINE RAKETE NEHR,DER 3 
SEEEST -EXFEBBIERT. IN 


SERINGEN AND ENNERHALE 


XD,YD: Koordinaten Explosion Flab 
XE,YE: Koordinaten Fallschirmsprin- 
ger 

SX,SY: Koordinaten Granate 

S(111): Geschwindigkeiten 
LKW,LW: Anzahl Lastwagen 

K,RT: Zeitauslöser (Flab, Rakete) 
V(1-E): Vorzeichen (X-Koordinaten) 
W(1-R): Vorzeichen (Y-Koordinaten) 
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RIRDISCHE GAENGE " 


CHEN SIE DARAN ZU" 
GET As 
EICHEN. IST DAS" 
ENNT WIEDER von " 
FRINT "VORN." 


EN ZU." 
FRINT : 
PRINT 
FRINT " 2 


FRINT "tBASB SFIEL WIRD MIT DEM Jövs 
STUFE: KNUEPFEL + 0B.FEUERKNOFF" 
STUFE: NUR KNUEFPEL" R 
FRINT " 3. STUFE: KNUEPPEL + UNT. FEUERKNOPF" 
FRINT ". 4. SIUFEr KENUEFFEL + UESFEUERKNOFF + 
NOFF 3": FRINT =: FRINT "VIEL SPASS !": GET A# 
REM *%# 1.STUFE #808 

GOSUR 3170 

0 FL = 100 


BOSUR 3050 
197 =19 +5 
= 


SCAL. 

HEOLO 3 

ROT= Ri: DRAW 1 AT X1,Y1 

IF ZB = O0 THEN RE Rl:XB = X1:YE = Yı 

768,190, = Via LE 769,3: .CALL 779 

1 THEN FR 

1 THEN 
RK 

ROT= RA: 

THEN 490 

DRAW 11 AT XRB,YE 

GUSUB- 5000 

HCOLOR= © 

RüT= » DRAW 1 AT X1,Y1 

IF AZ = 1: THEN 1330 

ROT= 0:2 DRAW 2 AT X2,Y2 

ROT= RAs DRAW 10 AT XA,YA 

ROT= RB: DRAW 11 AT XB,YB 

HCOLORS 8 


DRAW 2 AT X2,Y2 
DRAW 10 AT XA,YA 


GÜSUB 61 GOSUB 710: GUSUB 750 

IF ZB = O THEN RE = Ri:XB = X1:YB = Yı 
IF ZB = i THEN GOSUB 890 

IF ZB = 1 THEN 380 

REM *#% BEWEGUNGEN FLUGZEUG #** 


GSOTO 380 
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84  FRINT "TES LANDEN. DANN, IN DER LETZTEN STUFE, MUESSEN EEE DERER ONTE" 


FRINT "LAUFEN, E15 SIE ZUM HERZ DER ANLAGE BE- LANGEN. GRANATEN VERSE 


PRINT "HINDERN. DURCH AUFSFRINGEN UND HINLEGEN KOENNEN SIE IHNEN AUSW 


PRINT "HERZ ERREICHT, SO EXFLODIERT DER GANZE  STÜ 


FRINT "MIT JEDEM ZERSTOERTEN STÜETZFENET NEMPr DIE "ANZAHL BER LASEIAB- 
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IE. FOL.) > 
IFFREDIE KR 
IFRI=o0 
IF Ri 
IF Ri 
IF Ri 
IF Ri 
IF RK 

"IF RI 
IF Ri 

SI1=851+ 

Xl= X + 

Yı=zyvı# 
IF 1 
IF xı 
IF Yi > 
IF vı 
IF cx1 

1120 
RETURN 
REM 
IF X2 « 
RND (1)) 
IF LEW = 

X2 = x2 
RETURN 
REM 

VA: = 

WA = 
IF 

zA = 
IF 
IF 
IF 


135 THEN Ri 
110 THEN Ri 
OR Ri = &0 THEN 
THEN VI = 
OR Ri = 
THEN Vi 
ÜR Ri = 
THEN vi 
THEN vi 
THEN vi 
0.5 x Wi) 
(S1%* VD 
(S1 # WU 
>» 279 THEN Xi 
O THEN X1 = 
126 THEN CD 
10 THEN Yi = 
> 30 AND X1 < 


18 THEN v1 
1:Wi = -1 
36 THEN V1 = 


O:Wı #1. 


1:W1 = 0... 


1303 


**%* BEWEGUNGEN LASTWAGEN *** 
130 THEN X2 = 370:LKEW = LKW - 
+5 . 
© THEN BOSUE 3050: GUTO 2330 
- 82 


*r* 

x 
- Yyı 
© THEN WA = 1. 

(VA / WR) * (180 / 3.1416) 
2.5 THFN RA = 6 
THEN RA 

67.5 THEN Ra = 
Yi THEN RA = 

O AND ZA: 

X AND ZA IEN RA 
Ka AND ZA EN RA = 
XA AND Ya za x 


BEWEGUNGEN FLAB **%* 
xi 
YA 

Wa = 

ATN 

ZA 

zZ 

Zr 


EN Ra = 


4 


KH 
# SB 


BEWE N EOMEE #x* 


Ex VE) 
8 THEN XE ®) 
THEN XRB = 379 
AND (CXE 2 + 1& AND XB 
= 08 N 
AND CK 


> X2 4) 


AND XEB % 120) THEN YR = 


[HEN YE = ı ZB = 0: GOSUR 980 


2OMBE 8% 


GUSUB 50 


1110: 


» GOSUG 
XE,YE: HCOL 


RETURN 


769 ,4: 


= CALL 770: 
LAB LEW or 


10:RES 


GOTO 1180 
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20) AND Yi > 110 THEN CD = 


THEN AL = jixX2 = 


:_ GOSUB. 1120| 


L:RK = RK + 1182 = IN 


48 


278: 


110: 28 = 0: GOSUB 9 


URN 


LEW 1: YD = IE 
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SUB 5040 
HEOLOR= 5 
GOSUB 


A 1: 
xD,YD: 
JB 1310: 
xD, YD: 


H ; 
ee: "XD, YDs 
| H RETURN 
.: ; 
° 
° 
e: 
L 
° 
[ } U - 3 
N ı CALL 770: RETURN 
1 
|®: 
‘ 
% 
[1 
@ı 
° 
i 
®ı 
° 
> L 
®: 
° 
“ ' = DRAW 1 AT X1,Y1ls HCOLOR= 3 
@ı: (5 * Wu) 
ı 1440 X1 = Xi - 10 
©! 1450 IF Yı< 10 THEN Yi = 10:W1 = 0 
Bi x ÖO THEN Xi 
a 10 THEN 1490 
} ° 17707 
H - 16287) > 127 THEN XE- = X1:YE = Yl + 15: GOSUB. 1510 
1} 
ı® ! 
i 
©: 
| 1 
] {) 
0: 
4 L 
! DSUB 
©: 1550 HEoLaR DRAW 5 AT XE,YE: HCOLOR= 3 
| 1590 IF AE THEN 1660 
| [) A 1600 IF 5 x 2 
IE E) 
4 4 
| ' 
e: (AU * YW) 
4 279 THEN XE = 0 
e! 3 THEN XE : 
Mir » 130 THEN YE =0\_ 
| A (XE 80) THEN: YE 
| ® ! 110 AND (XE 55) THEN YE = 
ee “30 0R XE THEN EL =.EL - 
@: YE: » 
n FEER 27 THEN FOKE 232 
. A (M = 139: BÜSUR & ah 1710 
' 
' 4.STUFE 8% 
° P 
Be: 
‘ 
‘ 
®: 
° 
' 
: = 
! 1770 HEOLOR= 3 
eo: }789 DRAW 7 AT xm,ym h 
ı 1790 IF FDL (0) <& 110 OR _FDL (0) > 140 THEN HCOLOR= br. DRAW zZ AT. XMSY 
! M: HÜOLUR= 3: GOTO 1810 
® ı 13800 GOTO 1790 
! 1805  POKE 0: FOKE 235,112 
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1810 IF 
1820 _ IF 
1850. IF 
1840 IF 
1850 IF 


.FDL (0) 
POL (0) © 
FEEK C - 
FEEK (= 16286) % 
FDL (0) © 110 OR 
1360 ‚IF VM = 1 THEN SM = 7 
1870 IF.VM-= - 1 THEN SM= 8 
18380 vM = 0 
1890 IF AM = 
SY = 141 
IF AM 
SY = 159 


IF AM = 


140 THEN SM = 5 
110 THE 


16287) THEN 


FOLIO) 


THEN WM = 146:YM = 


1900 THEN WM = 164: YM 


19710 THEN WM = 181: YM 181 


146 — 


164 


= 2 THEN.- GOsuB' 


AND XM : 
AND XM = 
AND XM > THE = 
(4 = YM) 
&4 AND YM = 1 THIEN Kim 
16 AND VM = 1 THEN XM = 
DRAW SM A 
SW: IF SX 
RND (1) + 
"» XM THEN SW 
11 AT 8X,8Y: 
= SY OR YM = um 


1 969 
1970 
1980 
19770 


xM = XM.— 
IF XM 

IF. XM 
HEOL. 

= 5X + 
Int (1ö * 
IF 5% 
F xM + 
THEN ED a Dr) 


Ir vm 
FÜ 
HPLOT : 
GOSU 
HEIM. 


da) ar 


" XM,YM 
264,180 7 5,180: HPLOT 
DRAW IL AT 5X, 
IF VM = Ö THEN 1810 
(4 = vM 
4 AND VM = = 1 
AND VM = 1 THEN XM = 
» DRAW SN AT XM,YM 
FOKE 769,4: 


: DRAW SN AT 


XM,YM 


SOTO 1810 

DV =2 
IF AM = 1 THEN YM = 
IF VM = 1 0R SM = 
IF VM= - 

AV= - 


166 
THEN ROT= 48 
1 OR SM = 8 THEN  RüT= 


DV=5 
IF AM = 1 THEN YM = 162 
Ir“ 1 OR.SM = 7 THEN RoT= 
IE VM = - 1 OR SM = 8 THEN R 
Day 
wm = 0 
RETURN 


12 


8% 2,STUFE *%** 


40:Y9 = 139 


ok 
ROT= R9: SCALE= i 
DRAW-F AT X9,Y9 
ROT= Ri 

"DRAW 1 AT X1,Y1 
AI = 1: GOSUR 380: 
HEOLOR= © 


GOSUR 5000 
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CALL. 770 
HPLOT 264,181 TO 265,181 


THEN XM = 
1& 


CALL 770 


(SW 


. GOSUB_2190° 
THEN  GOSUE 
140 THEN. 1890: 


22680 


.GOFO-130: 


INT \C2.X_RND. (1928K = 1655 


AND 
.GOSUR: 2 


/ E). AND 5X > xMm = 15W./.2)) 
YM:XD = 5X: GOSUE 1150: 


264,181 TO 265,181 


264 
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: DRAW 9 AT X9,Y9 
: = Ri: DRAW 1 AT Xi,Yi 
HCOLOR 
BOSUB #10 
oO THEN 
110 THEN Y9 
Yıl THEN WO 
Yı-THEN W9 
> .Y9 THEN v9 = 
Xi THEN v9 = 1 
THEN v9 =  — 


GOTO 


Ys 


1 


wY) 
a 
“u9) 
P27-18] 


GOTO 
THEN 


 U9 * 
Yg = 
X =X7 - 
sy Ir 
IE .xX97 « 
IR 
IF 


ABS tVY) 7 9X 
(89 * W9) 


(U9 *.V9) 


Xi 
xı 


THEN R9 = 
THEN RY = 


12 
48 
110 


xı 5 AND X9 
Xl:ıYD Y4 


THEN ROT: 


[HEN RES = 


TO 189: 


‚120 TO 
0,118 TO 
DO, 

„116 


Pr 
‚i 
TO 80, 


1123. HRLOT 
TO 71,118: »HFLOT 

20 TO 85,120: HPLOT 

"116, 118 TO. 111,118 TO 
a TO. 111,178 
2 I Y = 150 
HRFLOT 130,18 


o TO 


1: 
157 


STEF 1: 


174 STEF 1: 


TO 
ro 


HFLOT 
20: 


‚184 T0 2 
OT 28151 
0,180 
7,181 TO 

HELOT 285 


##%* ANZEIGE ZWISCHEN DEN STUFEN 


HOME 
6 F STAGE = 
UNDEEEZF 


1 THEN 
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ABS 


XL +9 AND Y9 = 


HLOLOR= 


TO 73 


TO 150: 
130, 
HELOT 10,Y TO 
HFL.OT 


HFL.OT 


HTAB 16: VTAB 8: FRINT 


2850 
(89) 


THEN U9 = - 19: GOTD 2650 


Ib sh 
GOSUB 11504 
or 


3 AND Y9 
G0T0 2330 
DRAW I AT X1,Yi1: HCOLOR= 


1: 


H 50:XD = X9:YD = VOrRK = 


HFLOT 0,Y TO 279,Y: NEXT Y 
15_ 

18 T0 58,11% 
113 


‚116 


TO 56,116, 5 
TO: 74,113 10 71,110 


TO 73,118.T0 71,118 


TO 56,112 TO 
TO 74,110 TO 
Tb 71, 
67,109 TO.69, 111 TO. 53,111 TO.63 109 
57,116 
85,42 
ll, 


TO 75,116 
T0:85,118 
#) 


TO 80,115 


TO 80,118 To 


: HPLOT 36,Y TO 44,Y: NEXT Y: RETURN 


120 T0 135,119: RETURN 
ZRONN 
10,Y-210270,Y 


TOR YSTO 


X,139.T0 X,157: 
HFLOT X,168 10 X,174:. NEXT: 


| 261.173 10. 262,179: HPLOT 268,179 T 


ER 


"ROUND 
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3080 
> 


VTaB 14: HTAB 16 
FRINT "STAGE ";STAGE 
IF STAGE 4 .THEN STAGE = © 
HTAB_ 16: AB 18: FRINT "LIV F 
HTAB 16: VTAB-20: FRINT "SCORE -"ZRES 
TO 2400: NEXT I 

STAGE + 
FÜk. - 16504,0: FÜKE — 16297,0: FOKE - 16299,0 
RETURN 
R **# EINLEITUNG &%% 


HTAB 13 
ANCOIS JULITA" 
TO 4502 NEXT I 


FRINT CHRE (10)3 NEXT.I 


FRINT "presents" 

SFEED= 150 

FOR 1 = 0.10 15: FRINT CHRE (10): NEXT 
SFEE & 

HERZ 


95 TO 10,95 TO 10,47 TOD 33,47 
47 T0 66,47 TO 66,142: HPLOT 43,95 TO 66,95 
: TO 76,47 10 99,47 TO 99,142 TO 76,142: HPLOT 76,95 TO 


142 TO 109,142 
; 165,47 
„47 TO 198,47 TO 198,142: HFLOT 175,95 TO 198,9 


1, 0: STEP 


HCOLOR= 3 
DRAW"A AT 1,10 
DRAW 2 AF 1,180 
ROT= 48 
DRAW 9 AT I + 20,10 
FOR J = 0 TO 100: NEXT 
HEOLOR= © 
ROT= 0 
DRAW I AT 1,10 
DRAW 2 AT.1,180 
ROT= 48 
DRAW 3 AT I + 20,10 
ROT= © 
NEXT I 
RETURN 
REM **%* ENDE, DES SFIELS x**%* 
TEXT : HOME x 
HTAEB 16: VTAB 5: FRINT "GAME OVER" 
HTAB 14: VTAB 12: PRINT "YOUR SCORE: "HR 
HTAE 13: VTAR 18 
NT "NOCHMALS 7 CJ/ND 


"I" THEN T9 = O:LW = G:ES = O:fiks = Or RUN 105 i 
"N" THEN ı HTAB 1 -: ERINT "DANKE FUER!S SFIE 
: VTAB 18: FRINT "AUF WIEDERSEHEN": END 
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LÖN STUETZFUNET #3* 
= S:XD = 35:YD = 120:CD = 3 


Tot 
ı GÜSUB 1150 
10:XD = XD + 10 


INT (TX)) 


"ek FAUSEN er 


4790 


S000  FÜl 1:70 Loc NEXT I 
sola IF O0 THEN 3590 


es eo oe eo 


5015 IF 1 THEN RETURN 


>” = 10000 THEN FL = FL + ES = 


FÜR I = 
5990 REM 

euoo FÜR I = 290 

Sol DATA 


RETURN 

“RK 2 5 

READ A: ‚FOEE- I 
0,163,0,182,0 

7251, 100, 1, 170,1,108 
,39,37,45,45,53,45,44,45,44, ‚44,53,54,62,63,62763,&. 
3,63,45,53,54,54, 46,45,62,63,62,54,45,36,63,0 


DATA 45, 
45,62,62 
= 


54 a Be : 2194156,9 
3,60,63,54, 46,45,36,60, 


en a en 


3a, Es, aa ö 
62,46,54, 63,54,0 


&U7C 
Ein 


7,60,36, 45,54,59,45, 62,54,54, 45,0 


DATE 
Darf 
DATA 


Data 


36,45,44,37,45 ER 
WEISE: ,36,44,36,36,54,54,55,54,62, 


Data € ‚45,63,62,54,55,54,37,45,45,4 
4,0 
ein FOR FO READ Ar a 
:&190 DATA 8,0, '12,0,. 40,0; 115;0 
6200 DATA 44,54,57,59, 22,4,8,46,53,3 
40,53,28,27,18,34,0 ? 
8210 DATA 24,8,23,63,62,54,53,53,53,45,37, 45,60 
 »65,43,40,40,56,55,13,1,24,8,40, 44 ,42,46;1' 
7,17,41,30,27,46,53 5 
6220. DATA. 55,63,46,55,23 ‚59,31,59,63,24 563,36 
_ 85,7,0 
6230” DATA: 24,8, 24, 8,40,5,24,8 ‚alıoz, 
9,59,27, 7,24,28,31, 27,7 „24,24, ‚8,12 
46,10,9,10,17,10,33,24 8,32 ,3350 
6240 DATA  33,9,9,10 ‚45,23,53,55,7,0 
#250 DATA: 37,36,36,37, 62165,54,36, SE 
5. ‚63,63436,37.37,3 >7,45,44,45 
6260 DATA 63,45,53,45,45,62,62, 
53,46,54,63,45,54,46,0 ER 
6270 .FOR.IFO =. 770 TO 790: READ DT: F 
6280 DATA 173,48,192,136,208,5,206, 
Sa 


‚36,44, 


NEXT FO 


2352 249,9, 02, 


oooonnonnnnununnnnnennnnnnene nun en nun. 
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SERBRIE 


Zum Brief von M. Kötfing möchte ich 
folgendes anführen: Mirist dieser Fehler 
auch schon aufgefallen. In meinem Fall 
kam es zu dem Fehler, als ich das Mo- 
dul, ohne auf das Titelbild zurückzu- 
schalten, in die Konsole einschob. Dabei 
kann es passieren, daß der Resetbefehl 
nicht ausgeführt wird. Um solche Fehler 
zu vermeiden, schalte ich meinen TI erst 
aus, schiebe das Modul in den Slot und 
schalte dann erst wieder ein. So steht es 
auch in einigen Betriebsanleitungen zu 
den Modulen.‘Es gibtaberauch Module, 
welche nicht auf allen TI 99/44 laufen. 
Es kommt auf das Copyright -Jahr an. 

Zur Speicherplatzermittlung von F. 
Feuster und W. Schleiden kann man nur 
schmunzeln. Soweit mir bekannt ist, 
setztsich 1 Byte aus 8 Bitzusammen und 
nicht aus 8.50115 Bit. Richtig wäre: 

1 RAM=RAM+8 

2GOSUB 1 

RUN 

MEMORY FULL in 1 

Print RAM ergibt im Ext. Basic 13.920, 
im TI Basic ergibt das 14.536 Byte. 


W. Bürger 


Ich besitze einen ZX-81 (16K) und 
möchte jetzt auf ein anderes System um- 
steigen. Eigentlich wollte ich auf den 
VC-20 wechseln, aber ein Verkäufer riet 
mir davon ab. Er sagte, daß der VC-20 
ab Herbst nicht mehr hergestellt wird. Er 
meinte, daß ich auf den C 16 warten 
sollte, der der Nachfolger des VC-20 
wird. Nun meine Frage: 

1. Rentiert sich das Warten auf den 

C 16? 

2. Ist er besser als der VC-20? 

3. Wann kommt er ungefähr auf den 
Markt? 

4. Bringt dann HOMECOMPUTER 
auch Programme für ihn? 


M. Greiner 


Antwort: 
Da der C 16 im wesentlichen lediglich 
ein etwas verbessertes Basic bietet, da- 
für aber auch ein Stück teurer als der 
VC-20 sein wird, raten wir Ihnen, sich 
‚ dasreiflich zu überlegen. Prüfen Sie lie- 
ber, ob Sie nicht noch ein wenig dazu- 
sparen und dann ein leistungsfähigeres 
System erwerben sollten, zumindest ei- 
nen C-64. 
Im übrigen ist der C 16 nur in Amerika 


erhältlich - es kann noch ein knappes. 


Jahr dauern, bis er hier verfügbar sein 
wird. 


Selbstverständlich werden wir, sofern 
er in Deutschland, Österreich und der 
Schweiz vorliegt, auch Programme für 
den € 16 anbieten. 


Ich habe mit vor kurzem einen Brother 
Ep 22 Schreibprinter gekauft, den man 
mit der beigefügten Software und dem 
dazugehörigen Druckerkabel mit Inter- 
facestecker auch als Ausgabedrucker für 
den VC-20 nutzen kann. 

Leider läßt sich die RS 232 (V 24) Schnitt- 
stelle mit der Software nicht genau ini- 
tialisieren. Die einzigen Zeichen, die 
ausgegeben werden, sind” ”" und” ”. 
Die Software soll im Direktmodus einge- 
geben werden. 

OPEN 2,2,2, CHRS(Q)+CHRYO): 
CMD2:LIST 

Nach mehreren vergeblichen Versuchen, 
auch mit anderen Initialisierungen, ha- 
be ich aufgegeben. Vielleicht könnt Ihr 
mir weiterhelfen. 

‚Noch drei Worte zu Euren Zeitschriften: 
"Macht weiter so” 


‘L. Rinke 


Antwort: 

Hier mußten unsere EDV-Experten 
passen, weil wir den EP-22 nicht im 
Haus haben. Wir müssen also diese 
Frage an unsere Leser weitergeben. 
Wer sich bei den Electronic Printern 
von BROTHER auskennt, sollte uns 
unbedingt schreiben, damit Ihnen schnell 
geholfen werden kann. 


Ich habe folgende Fragen: 
1. Ich besitze seit einigen Monaten einen 
VC-20 und eine Datasette. Der Ladevor- 


gang eines 16K-Bit-Programmes dauert . 


einige Minuten. Gibt es eine Möglich- 
keit, den Ladevorgang zu beschleunigen 
ohne einen Eingriffin das Gerät vorneh- 
men zu müssen? 

2. Gibt es einen Listschutz, der während 
des Ladevorgangs bereits aktiv wird? 


N. Bollinger 


Antwort: 

Zu Ihrer ersten Frage können wirIhnen 
raten, Ihren Fachhändler nach dem 
”Turbo-Tape”-Programm zu fragen, 
das ein spezielles TOS, also ein Tape 
Operating System darstellt und eine 
wesentliche Verkürzung der Ladezeit 
durch Erhöhung der Baudrate bietet. 
Was den von Ihnen gewünschten List- 
Schutz betrifft, so gibt es ihn in 
Deutschland noch nicht. Entwickelt ist 
er aber bereits und wird mit Erfolg in 
vielen Industrieprogrammen benutzt. 


Ich lese HOMECOMPUTER und CPU 
seit9 Monaten und möchte Ihnen mittei- 
len, daß ich im großen und ganzen mit 
Ihren Heften sehr zufrieden bin. Ich 
warte schon immer fieberhaft auf die 
neuesten Ausgaben. Allerdings, wie bei 
allem, was gut ist, muß ich auch hier et- 
was kritisieren. Ist es denn nicht mög- 
lich, die Programme schärfer und ge- 
nauer zu drucken? An einigen Stellen 
muß man ‘schon einige Program- 
mierkenntnisse haben, um das, was dort 
steht (oder stehen müßte) zu rekonstruie- 
ren. Ich möchte hier auch die Pro- 
gramme selbst ansprechen. Ich für mei- 
nen Teil bin schon langsam übersättigt 
an Actionspielen. Sie sollten mehr in der 
Art von "Spukschloß” bringen. Ich 
glaube, daß ich auch im Namen von an- 
deren ZX-81-Besitzern spreche. 


E. A. Kroboth 


Antwort: 

Es stimmt, mit der Druckqualität unse- 
rer Listingseiten sieht es noch nicht gut 
aus: Wir hoffen aber, dieses Problem 
schon bald bewältigt zu haben. 

Was die Art der veröffentlichten Spiele 
betrifft, so verstehen wir Sie ebenfalls. 
Auch wir freuen uns über eine origi- 
nelle Spielidee mehr als über die 500ste 
Pacman- oder 350ste Space-Invaders- 
Version. Bitte berücksichtigen Sie aber, 
daß immer neue Computerfans unsere 
Hefte kaufen - auch solche, die bislang 
keinen Computer besessen haben und 
vielleicht vor ein zwei Wochen ihr er- 
stes Action Game gespielt haben. 


Ich würde mich freuen, wenn Sie mirfol- 
gende Fragen beantworten könnten: 
Ich besitze Listings für den Spectrum, in 
denen Buchstaben unterstrichen sind. 
Wie erreiche ich das? Dann habe ich 
noch eine Frage zum Computerposter 
"6+7”: Im Vorprogramm heißt es in ei- 
ner REM-Zeile "Gestartet wird mit 
RAND USR 16768”. Was ist damit ge- 
meint? Und zu guter letzt: Woher be- 
komme ich eine deutsche Anleitung zu 
Fighter Pilot? 


U. Hermanns 


Antwort: 

Zu Ihrerersten Frage können wirIhnen 
mitteilen, daß es sich hier um ein Gra- 
phikzeichen handelt, d.h. eine Kennt- 
lichmachung, daß Sie vor Betätigung 
der jeweiligen Zeichen (-Tasten) in den 
Graphic Mode gehen müssen. 

Frage Nr. 2: Hier handelt es sich um 
eine Verwechslung zwischen Spectrum 
und ZX-81, was wir zu entschuldigen 
bitten. 

Die letzte Frage müssen wir unbeant- 
wortet an die Generalvertretung von 
Sinclair weitergeben. Schreiben Sie an 
SINCLAIR DEUTSCHLAND GmbH. 
Postfach, 8012 Secbryin 
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Genau 4830 Leser machten 
von der Möglichkeit Ge- 
brauch, im Rahmen unserer 
großen Befragungsaktion 
nicht nur einen nützlichen Bei- 
trag zur Gestaltung ihres 
Fachmagazins zu leisten, son- 
dern darüber hinaus noch tolle 
Software-Kassetten oder gar 
einen erstklassigen Heimcom- 
puter zu gewinnen. 


Interessant ist sicher die Aus- 
stattung unserer Leser. Sieht 
man einmal von recht unter- 
schiedlicher Peripherie ab, 
so ergibt sich die folgende 
Verteilung an Computer- 
Modellen... 

4.1% waren zum Zeitpunkt 
der Befragung ohne Com- 
puter, 3% arbeiten mit einem 
Apple Ile. 7.8% mit einem 
ZX-81, knapp 9% mit einem 
Spectrum und fast 23% mit 
dem VC-20. Mit 34,8% liegen 
die Besitzer eines Commo- 
dore-64 ganz eindeutig vorn. 
Mit dem legendären TI-99/ 
4A von Texas Instruments 
programmieren immerhin 
noch stolze 16,5%. zu denen 
auch unser glücklicher Gewin- 
ner des BIT-90 zählt. (Alle 
anderen Marken lagen un- 
ter 1%). 


ENDLICH! 
HIER IST DAS ERGEBNIS UNSERER LESERUMFRAGE AUS 
HOMECOMPUTER UND CPU- UND NATÜRLICH GEBEN WIR JETZT 
AUCH DEN GEWINNER DES BIT 90 BEKANNT! 


Aber jetzt einen lauten und 
anhaltenden Applaus für 


Harald Sachs, 
Max-Eyth-Straße 58, 

6000 Frankfurt/Main 61, 
der schon in den nächsten 
Tagen den Bit 90 sein eigen 
nennen kann. 


Die 50 Leser, die wertvolle 
Spielprogramme auf Bän- 
dern aus unserem Kassetten- 
Service gewonnen haben. 
sind schriftlich benach- 
richtigt worden. Herzlichen 
Glückwunsch auch ihnen! 


Alle, die leer ausgegangen 
sind, sollten den eigentlichen 
Zweck unserer Aktion nicht 
vergessen, der ja darin be- 
steht, den HOMECOM- 
PUTER noch besser an den 
Wünschen der Leser aus- 
zurichten. Und dazu bei- 
getragen zu haben, lohnt in 
jedem Fall den Einsatz. 
HOMECOMPUTER _be- 
dankt sich bei allen Teilneh- 
mern der HC-LESER- 
UMFRAGE 84. 
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Unser Softwareversand bietet Ih- 
nen zu wirklich einmalig günstigen 
Preisen jeden Monat die neuesten 
Programme (zu den bereits in frü- 
heren Ausgaben veröffentlichten), 
auf Kassette bzw. Diskette an. 
Wenn Sie die hier aufgeführten 
Bedingungen beachten, können 
auch Sie von unserem Angebot 
Gebrauch machen. 


Bestellungen Inland: 


Gegen Einsendung eines 
Schecks oder Vorauszahlungauf 
unser Konto bei der Kreisspar- 
kasse Eschwege. 

Bankleitzahl 522 500 30 
Kto.-Nr. 45 32 934 

senden wir Ihnen die gewünsch- 
ten Programme schnellstmög- 
lich zu. Geben Sie bitte unbe- 
dingt .die genaue Bezeichnung 
der Kassette (z.B. CPU 1/84 TI- 
99/4A) und des Computers an. 


Bestellungen Ausland: 


Nur Vorauskasse, Schein 
(Kassette 10.- DM. Diskette 20.- 
DM). Keine Schecks oder Über- 
weisungen! 


Lieferung noch nicht erhalten? 


Bei Überweisung aufunser Kon- 
to kann es bis zu 2 Wochen 


An Homecomputer 
Fuldaer Straße 6 
Postfach 629 
3440 Eschwege 


kaufsangebote, Kauf- 


tausch usw. 


ge 10,- DM. 


Auftrag für Gelegenheitsanzeigen in Homecomputer 


Unter der Rubrik „Kleinanzei- 
gen“ veröffentlicheri wir Ge- 
legenheitsanzeigen für Ver- 
und 
Tauschgesuche, Kontaktauf- 
nahme bzw. Erfahrungsaus- 


Preise für „Kleinanzeigen“: 

Private Gelegenheitsanzeige 
je Druckzeile 5,— DM inkl. 
MwSt. Chiffregebühr je Anzei- 


Gewerbliche Gelegenheitsanzeige 
je Druckzeile 11,- DM inkl. MwSt. 
(dürfen nicht unter Chiffre erschei- 
nen). 


\ 
dauern. biswir Ihre Bestellungin 
Händen haben. . 
Oft passiert es. daß auf der Über- 
weisungsdurchschrift weder Na- 
me. noch Op, noch Art der Be 
stellung zu erkennen sind. 
Schreiben Sie uns! (Anrufe ech 
kosten viel Geld und bringen. „u N 
weil dann Schriftvergleiche nicht ' ;- ans HC.10/08 
möglich sind. kein Ergebnis). vC-20 


Bundesliga 
Galaxy-Fighter 


K10,- DM Atari K12,- DM 
Wenn &s bei uns besonders hek- | Atlantis D16,-DM | Farbtest 
tisch zugeht. dannkannesschon | Olympiad TipTab 
mal passieren. daßes mit der Lie- Auto-Route 
ferung etwas länger dauert. Ver- | ZX-81 K12,-DM 
gessen Sie bitte nicht: Der Kas- | Fliegenfänger Apple II K10,- DM 
settenservice ist ein zusätzlicher | Hausrat Sabotage D 16,- DM 
Service von uns. derIhnen. dem | Trapper 
Leser. Tipparbeiten ersparen TRS 80 K 10,- DM 
soll (Sie kennen den Versuch | ZX Spectrum K10,- DM Bowling 
einer anderen Zeitschrift. dieses | ZX Load 
per Lichtgriffel zuermöglichen). | Ganymed Sharp K10,- DM 
Wir tun unser möglichstes. Aber Textverarbeitung 
Pannen sind nie ausgeschlossen. Commodore 64 K10,- DM 
Bitte haben Sie in solchen Fäl- | Lauf64 D16,-DM | Laser K10,- DM 
len Verständnis. Imbiß Break Out 


- Name und Adresse 


Unterschrift Ich zahle sofort nach Rechnungserhalt. 


Ich wünsche folgenden Text zu veröffentlichen: 


Zutreffendes ankreuzen 
DO Tausch D Versch. 
DO) Kontakte [DI Chiffre 


suche U) Software 
biete an [] Software 


suche [] Hardware 
biete an [] Hardware 
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BIETE AN SOFTWARE 


ZX-81-Assembler. "Homecomputer" 
(8/84) hat ihn getestet und für 
gut befunden. 20 Seiten Info + 
Testbericht erhalten Sie gegen 
2,50 DM Porto von Horst Kling, 
Hermannstr. 7, 7000 Stuttgart 1 


© ZX Spectrum 48K ® 
© Saven u. Laden in 10 verschied. @ 
© Geschw. Normal u. Headerless @ 
M. Klug, 4 Düsseldorf 30, Goebenstr. 18 


Lernprogramme für VC-64 + Tl (z.B. 
Mathematik, Elektronik, Bio) Paedco, 
Postfach 2021, 4057 Brüggen 2 


TI-99/4A: Neue Spielel 3D-Games 
mit unglaublicher Supergrafik!! 
Superaction, ab 1 DM/info 1 DM 
C. Wurzer, Grüntenweg 14, 85 Nürnberg 


Brandneue ZX-Spectrum-Schneider- 
CPC 464 Software/Gratis Katalog 
ZX-Soft, P.O.Box 2361, 8240 B’Gaden 


LE.2 2 22 22 205 2022127 
Commodore 64 
WordPro + 3 (Textpropgramm) 
mit dtsch. Handbuch DM 298,- 
Computerware GbmH, Postf. 16724, 
Wilh.-Leuschner-Straße 34, 
6000 Frankfurt 1, @069/236713 
LE.22 22 202 202 21272127 


VC-20-Softwarel Preisgünstig! 
Liste gegen 80 Pf. Rückporto von 
S & L-Soft, Postlagernd, 
5014 Kerpen Horrem 


%* %* x Hallo V6-64 User x % %* 
%* Hier gibt's die aktuelleste »#* 
% Software, Auswahl aus über 2500 * 
%* Progr. Viele Neuzugänge aus USA # 
% und GB. Info gegen 1,40 in Brfm. * 
% über 50 seitige Programmaus- 
% wahl, Udo Göbel, Frohnhauser 471 x 
% 4300 Essen 1. @0201/740913 %* 
Wr a 


6-64 7 neue Grafik + Sound Befehle 

(Print At, Seroll links + rechts, .. 

.] Aufruf mit Sys) + Anleitung + alle 
wichtigen POKEs + Tricks auf 

Qualitätscassette = 20,- DM (Schein/ 
Scheck) Lieferung In 48 Stunden! 

C. Wurzer, Grüntenweg 14, 85 Nürnberg 


2X-81 HRG Bildschirmgrafik ZX-81 
* 192x128 Auflösung * 
* 26 Pixel pro Sek. * 


5,- DM Schein + Freibrief an WM, 
Johannisberg 12, 5461 Windhagen 


Dragon Soft+LitVerkauf @06144/41754 


MZ700 Software z.B. Bundesligatab. 
m. 2 Dateien, Anschriftendatei, Vok.- 
Trainer m. Datei, Universaldatei, 
Privatbuchhaltung, je 20+NN (Rückp. 
=Info) GREIN, Pf 1513, 3550 Marburg 


Sharp PC-1401 Supersoftware. Preis: 

250 ÖS. Lieferung nach Zahlung. 

Volksbank A-3335 Weyer, Kto.Nr. 

54031340001 Info: H. Peter, Oberer 
Markt 1, A-3335 Weyer. 


LEINANZEIGEN]E 


"Einmalig in Deutschland” "Hacker"- 
PGM für Homecomputer auf Cass./ 
Disk. mit ausf. Beschr. Computertyp 
unbedingt angeben. 20,- DM-Schein 
an H. Nagel, Schmiedestr. 53, 4000 Daf. 


® TI99/4A @ Super-3D-Spiele ! 
Topgrafik + Sound ! Adventures !! 
Action-Spiele !  Grafikprogramme ! 
Datei ! Mathe ! Ab 1,- DM/Info 1,- DM 
€. Wurzer, Grüntenweg 14, 85 Nürnberg 


TI-99/4A: Bundesliga und andere 
TI und Ex-Basic-Programe zu ver- 
kaufen - Info gegen Rückumschlag — 
B. Knedel, Tulpengasse 16, 
3171 Weyhausen. @05362/71187 


BIETE AN HARDWARE 


%* CBM-64 Hardware Rii 
% Resettaster + Old; 
% 80-Zeichen, Centronics, Copyrom Ar 
%* Recorderinterfaces Modems # 
%* Gratisinfo anfordern! Sprenger, 
% Brassertstr. 18, 4300 Essen 1 #* 


Verkaufe VC-20+Mod.Box (6 Stckpl.) 
+ Datass + 64Kb Erw. (schaltb.) 
mit Joystick & Paddles sowie Massen 
von Software + Extralit. 
Alles zusammen: 805,- DM, 
Bei Andreas Pohlke, ®030/4335324 


TI-99/4A: Riesenauswahl an Soft- 
ware + Modulen aus USA zu Super- 
preisen. Info gg. DM 1,-: Riegert, 
7324 Rechberghausen, Schlosshof 5 


ACHTUNG VC-20/64 
Ständig TOP Angebote für Euren 
Computer auf Lager! Programme ab 
90. 


Ir. Komplette Pro- 
grammpal ab 5,- DM. Textverar- 
beitung unter 10,- DM. Tabellenkal- 
kulation, Übersetzungs- und Büro- 


programme (Spitze) zu Knüllerpreisen. 
Ein Katalog mit über 60 Selten wartet 
schon auf Euch! Werbekassette (rand- 
voll mit Programmen) und Katalog zu- 
sammen für nur 3,- DM in Briefmar- 
ken! Schreibt heute noch an S + S 
Soft - J. Schlüter - Schöttelkamp 23 a 
— 4620 Castrop Rauxel 9 - Abt. N 12 - 
(Gomputertyp nicht vergessen) (Keine 
Copyrightprogrammel) 


Cassettenrecorderkabel'ö für TI-99 
original TI-99/4A, nur 25,- DM p. NN 
Noack, Leostr. 16, 41 Duisburg 18 


Verkaufe Atari 600XL + 64K Erw. +4 
Modulen+Lek.+Buch 1/2 Jahr alt VB 
Ralf Kilden, Am Sattelgut 96, 
4630 Bochum 5 


Atarl 400 + Rec. + Schach-Rom+Lit. 
500,- DM, Atari 2600 mit 15 Kasset. 


600,- DM, ZX-81+16K+Tastatur+-Lit. 
200,- DM, @069/3644 1411 
Verkaufe VC-20 mit Modulbox (6 


Stckpl) +64Kb Erw. (schaltbar) + 
Datasette, sowie Joystick & Paddies. 
Außerdem Massen an Software & et- 
liche Extraliteratur (z.B. Speicherbe- 
legung der Zero- und diverser ande- 
rer Pages). Das alles für DM 805 bei 
Andreas Pohlke, 030/433 53 24 


‚Anwenderprogramme und Utilities 
für den ZX-Spectrum, Gratisinfo 
anfordern bei: Friedrich Neuper, 

8473 Pfreimd, Leuchtenbergerstr. 1 


Apple Il: E.T. (Alleslerner), u.a. 
Tamm G., Solmsstr. 43, 1 Berlin 61 


Neuer WVC-20/C-54 BASIC-Compiler 
Prog. laufen bis 40 x schneller. 
Kompaktor, Renumber, Listschutz. 
Info 80 Pf. Klaus Raczek, Wickrath- 
berger Str. 12, 5140 Erkelenz 


KR 
64er-Progr. zu Superpreisenil! 
Info gratis! 
R. Zillich, 
Zoppoterstr. 27a, 4000 Düsseldorf 13 
La 2 2 22 22 22 2272027 


Commodore 64 - Günstige Gelegen- 
heit: Wegen Systemwechsel 250 
Topprogramme auf Disk oder Cass. 
für nur DM 200,-. Schein/Scheck 
oder NN. auch möglich 70 PRG’ für 
nur DM 50,-. Bestellung an: 

P. Weber, Alter Teichweg 137 F, 
2000 Hamburg 70 


V6-20 Software billig, billig 
Action, Organisationsspiele 
Ausführliche Liste gegen 80 Pf. Porto 
Anfordern bei: Th. Schläger, 
Elsastr. 28, 2000 Hamburg 76 


6-64 120 Top Programme für 
45,- DM zu verkaufen. 
06479/6947 nach 17 Uhr 


YC-20 + Modul + div.Spiele +Datasette 
+ Joystick + Basickurs (3 Hefte + 
Kassette) VHB DM 550,- @07263/5929 


V6-20+3K+Softw. (fast neu) für 270 
DM, Marcus Plank, #0841/35237 


TI-99/4A + Cass-Kabel + Peribox + 
RS232 + Laufwerk + Drucker(GP100) 
+ ExBasic + Spielmod. @07022/59852 


Joysticks Quickshot Il: 30,- - DM 
Datenmonitore Zenith-12”-15MHZ, 
Superpreiswert für nur 275,- DM, 
@05241/15182, 24-Std.-Service 


TI-99/4A + Joystick + Ext. Basic + 
org. Handbuch + Kabel + Cass.-Gerät 
Preis VB 600,- DM, @06181/49137 


Apple Comp. 48K 998.-, Floppy 5,25" 
Slimeline 580.-, Controler 165.-, 
Monitore 20 MHz 12" Gelb 398.-, 
INFO kostenlos, Nolte-Bürotechnik, 
2000 Hamburg 61, Stavenhagenstr. 3, 
@040/588838 Tag + Nacht 


TI-99/4A + Ext.Basic + deut.Handbuch 
Joysticks + Recorderkabel + div. Soft- 
ware, VB 550,- DM, @02232/48693 


%*TI-99/4A% + 17 Module + Messe- 
schrank + Rec.Kabel + Joysticks 
+Spielkassette,VB 950, ®06762/7808 


Atari 600XL, 1/4 Jahr alt + Recorder 

+ Software +  Lehrkurs + 

Literatur + Videospiel, 590- DM, 
Raum Osnabrück, @05424/8473 


TI-99/4A: Sprachsynthesizer+ Modul 
VB 220,- DM, ©02334/52405 ab 14° 


TI-99/4A + 2 Joyst. + 1 Modul + 
Rec.Kabel + Basic-Kurs + Buch + 
Softw. 400,- DM, ©05232/65741 


Gomputer+Zubehör+Software. — aus 
einer Hand, Liste “gegen Rückporto 
bei Computerversand Filke, 
Weidendamm 5, 3167 Burgdorf 2 


Verkaufe: VC-20+Datasette+16K+8K 
+3Bücher+2Module+Spiele für 700DM 
Bucheinzelverkauf, #069/372872 


WE re 
Soft- und Hardware für VC-20 + 64 
Akustik-Koppler, Schnittstelle, 
Doppellauf-Floppy Speichererw. 
40/80 Zeichenkarte und Bustreib. 
für 1541, macht Ihre Floppy 8 x 
schneller beim Einlesen. Katalog 
anfordern bei 

Norbert Flesch, Lippspringerstr. 14, 

4650 Gelsenkirchen 
50209/395447 

2.0.2 2.2 202 2 2 22 21277 


V6-20+8K+16K+32K+36 Progr. 
zu verk. VB 390 DM, K. Scherkenbach, 
@02267/4870 


Verkaufe C-64 + Datas. + Gar. + Prog. 
für: DM 750,- 
Bei Int. an: Monika Wohlfeil, 
Danziger-Weg 5, 5434 Dernbach 


ELEKTRONIK BAUTEILELISTE mit SUPER 
PREISEN! Gegen -,80 DM Rückporto 
Commodore C84 Teilzpr. mon 77,- DM 
Commodore EXecutive 64 Teilzpr.mon.249,-DM 
Näheres bei: Elektronik Versand, 
Haselgraben 17, 7917 Vöhringen 


SUCHE SOFTWARE 


Suche für TI-99/4A - Ext.Basic- bzw. 
andere Module. Auch Kassetten Soft- 
ware. Angebote an: A. Stemmer. 
Hirblingerstr. 19, 8900 Ausgsburg 


We are currently looking for original 
debugged games for any machine, to 
market in the U.K. If you have any 
programs that fit those criteria, call us 
on 010 44 532 450879, or write, for 
further details, DARKSTAR, 

32 Sovereign Street, 

Leeds LSI, 4BJ, England 


VERSCHIEDENES 


TI-99/4A Druckerservice 
Erstelle Ihnen Druckerlisting 
von Ihren Programmen (Basic/ExB), 
von Kassette je PGM-Zeile 3 Pf. + 
25 DM Porto. Alexander Strauch, 
Lindenallee 64, 5000 Köln 51 


NEUERÖFFNUNG, jetzt endlich 
ab 01.10.84 auch im Grenzland 
Home-Computer, PC's und Zubehör 
VALG-Computer-Shop 
Peter Kohl, 
Waaggasse 4, 8230 Bad Reichenhall 


HÜBSCHE JUNGE DAMEN aus 
nah u. fern suchen Briefwechsel 
Freizeitgestaltung, Urlaub, Hei- 
rat,etc. Fotoprospakt kostenlos! 
D. Rothe, 1 Berlin, Postfach 270/U 
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KORREKTUR 


Das Listing zum Programm Würgmann, aus HG 8/84, muß um 
folgende Zeilen ergänzt werden: 


3206 REM LABYRINTHMAUERN PER ZUFALLSGENERATORE AENDERN UND ZUGEHOERIGE VARIABLEN 


SETZEN 


3216 
3226 
3236 
3246 
3256 
3266 
3276 
3286 
3296 
3308 
3318 
3326 
3336 
3346 
3350 
3360 
3370 
3386 
3390 
3466 
3416 
3420 
3436 
3446 
3450 
3466 
3476 
3486 
3496 
3560 
3510 
3526 
3530 
3540 
3556 
3560 
3576 
3580 
3596 
3660 
3610 
3620 
3636 
3646 
3650 
3666 
3676 
3680 
3696 
3708 
3710 
3726 
3736 
3746 


REM 

IF A2(2)=1 THEN 3316 

REM 

REM WAAGRECHT 

REM 

LET Ci1=A2(2) 

LET C2=A2(4) 

CALL CHAR (163+02,A2$(C1)) 
LET AT(CDI=CH 

G0T0 2476 

REM 

REM SENKRECHT 

REM 

LET C1=A2(2) 

LET C2=A2(4) 

CALL CHAR (167+C2, A2$ (C1+2)) 
LET A7(C2+4)=C1 

G0T0 2476 

REM 


REM PUNKTE FRESSEN UND LOESCHEN - SCORE ERHDEHEN - SOUND ERZEUGEN 4266 


REM 

REM PUNKTE FRESSEN 

REM CHR$ (136) 

IF A%>136 THEN 3596 

CALL HCHAR (BB, B9,C5) 

CALL HCHAR (AB, A1,A6) 

LET C3=C3+1 

LET A8=AB+70 

LET AS=13 

LET (5=32 

CALL SOUND (220,523, 6,659,0) 
CALL SDUND (226,587,0,698,0) 
CALL SOUND (220, 659,0, 784,0) 
CALL SOUND (220, 587,0,698,6) 
CALL SOUND (220,523, 0,659,0} 
GOSUB 4450 

IF C3=12 THEN 4156 

RETURN 

REM CHR$ (144) 

IF AS<S>144 THEN 3756 

CALL HCHAR (BB, B9,C5) 

CALL HCHAR (AB, A1,A6) 

LET C3=C3+1 


LET AB=AB+60 4440 
LET AS=13 4450 
LET (5=32 4466 
CALL SOUND(170,262,0,523,3,1647,2) 4476 
CALL SOUND (170,330, 0,459,3,1319,2) 4486 
CALL SOUND(170,349, 6,698, 3, 1397,2) 4490 
CALL SOUND(176,330,0,659,3,1319,2) 4506 


CALL SOUND (176,262, 0,523,3,1647,2) 


GOSUB 4456 
IF C3=12 THEN 4150 
RETURN 


50 REM CHR$(130) 


IF ASC>136 THEN 3926 
CALL HCHAR (BB, B9,C5) 
CALL HCHAR (AB, A1,A6) 
LET C3=C3#1 

LET AB=AB+20 

LET AS=13 

LET C5=32 

FOR C9=1 TO 3 


CALL SOUND (190, 220, 0,440,4,886,2) 


NEXT C9 


CALL SOUND(196, 196, 8,392,4,784,2) 
CALL SOUND(196, 262, ,523,4,1847,2) 
CALL SDUND(190,220,0,440,4,880,2) 


GOSUB 4456 
IF C3=12 THEN 4150 
RETURN 

REM CHRS (152) 

IF ASC>152 THEN 4076 
CALL HCHAR (BB, B9,C5) 
CALL HCHAR (AB,A1,A6) 
LET C3=C3+1 

LET AB=AB+SO 

LET AS=13 

LET (5=32 


CALL SOUND (216. 262,0,323,5, 1647; 1) 


4670 
4680 


4690 GOSUB 4688 
3766 PRINT : 3" 
f #tbatctt" 
4718 PRINT * 

ff tbeea" 
4728 PRINT * # 


## AR Zr ia 
4746 PRINT * 


476% FOR A3=1 TO’ 408 


'BRREEEREREEERRReeRA 
ffeeaf'eaff bc fee + 


f f f 
4730 PRINT * de 6; #4 Ban 


fbeec ba'‘c bemef # # 
4756 PRINT 3 2 s s"PRESS ANY KEY FOR A NEW GAME" 


CALL SOUND (216, 175,0,349,5,698, 1) 
CALL- SOUND (210,247, 0,494,5, 988, 1) 


CALL SOUND (210,220, 0,440,5,886, 1) 
CALL SOUND (210, 196,0,392,5,784,1) 
GOSUB 4450 

IF C3=12 THEN 4150 

RETURN 

IF AB>A9 THEN 4100 

RETURN 

A9=AB 

FOR A4=1 TO LENISTR$(A9)) 

CALL HCHAR (22, 18-LEN(STR$ (A9) )+A4, ASC (SEGS(STRE (AP „AA, 1)) 
NEXT A4 

RETURN 

REM 

REM NAECHSTE RUNDE 

REM N 

CALL SOUND (206,523, 4,1047,2) 


CALL SOUND (260, 784,4, 1568, 2) 
CALL SOUND (260, 780, 4; 1486, 2) 
CALL SOUND (208, 784,4, 1568, 2) 
CALL SOUND (206, 740,4, 1586, 2) 
CALL HCHAR (22, 27,48,3) 

FOR A4=1 TO 2 

CALL SOUND (260, 523,4,784,4,1047,2) 
NEXT A4 

IF AB<A9 THEN 4298 

AI=AB 

LET CB=C8-10- 

IF C&<1® THEN 4310 ELSE 4320 
LET C8=16.1 

LET AB=AB+INT(AS+1) #10 

LET A3=CB 

LET C3=0 

CALL HEHAR (AB, A1,CH) 

LET AQ=0 

LET Al=6 

GOSUB 4456 

GOSUB 2020 

FOR A4=109 TO 107 

CALL CHAR (AA, "OBBOFFOBBOFF6RRO" ) 
CALL CHAR (A4+4, "2424242424242424*) 
NEXT AA 

G0TO 2286 

FOR A4=1 TO LEN(STRS (AB) ) 

CALL HCHAR (23, 18-LEN(STR$ (AB) )+A4, ASC(SEGS (STRE(AB) „AA, 133) 
NEXT A4 

RETURN 

GOSUB 4080 

FOR A4=1 TO 2 

FOR A3=0 TO 4 

CALL SOUND (-100,587,A3) 

NEXT AS 

FOR A3=5 TO 9 

CALL SOUND(-196, 459, A3) 

NEXT AS 

FOR A3=10 TO 14 

CALL SOUND (-106,523,A3) 

NEXT AS 

FOR A3=15 TO 19 

CALL SOUND (-100,587,A3) 

NEXT AS 

FOR A3=26 TO 28 

CALL SOUND (-160,494,A3) 

NEXT AS 

NEXT AA 

IF 'ABDA9 THEN 4680 ELSE 4700 
LET A9=AB 


f'ena'seea'a 'a'gec HH 
ffbectt #4 


f'eeaf 
ff fba 


f'eee'eeaf" 
‘c(ee (erct SEAT 


beseeaecheeneasaseec" 
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4776 NEXT A3 

4786 CALL KEY(6,B1,B2) 

4799 IF B2 THEN 4880 ELSE 4786 
4806 CALL CLEAR 

4816 GDTO 1666 

4820 CALL CLEAR 


4988 LET B6=n6 > 

4996 IF (B&=B3) +(B&=B5) THEN 4970 
5080 LET AG=22 

5010 LET A1=26 

5026 GOSUB 5066 

5030 LET B4=A& 


4856 PRINT * "BRERERERREREeReEREeERA + WUERGMAN STEUERUNGS # beeseesee 5040 IF (B4=B6) +(B4=BS) +(B4=B3)THEN 5020 
BeRBReeREReeeC" 50656 GDTO 1336 
4846 PRINT : : 2 ı" 'eneeeeeea # OBEN f 5660 REM 
beeeeeeeec" 5076 REM INPUT AT(AB,A1) 
4856 PRINT ı : :"‘eeeeeereea ‘eeeeeeeeeeaf LINKS f f RECHTS fbeeeeee 5680 REM 
etec beeeeeeeeeec" 5690 CALL SOUND (150, 1466,2) 
4860 PRINT : : :" ‘eegeeeeeea + UNTEN f 5160 CALL HCHAR(A®,A1,94) 
beeeeeeeeec" 


5110 FOR AS=1 T0 5 

5126 CALL KEY(6,A6,A3) 

5150 IF As=-1 THEN 5146 ELSE 5166 
5140 NEXT AS 

5150 GOTO 5180 

5160 CALL HCHAR(AB,A1,A6) 

5176 RETURN 

5188 CALL HCHAR (A6,A1,32) 

5196 FOR AS=1 T0 5 

5208 CALL KEY(®,A6,A3) 

5210 IF As=-1 THEN 5220 ELSE 5140 
5220 NEXT AS 

5236 GOTO 5106 


4870 LET Ad=16 
4886 LET Al=19 
4895 GOSUB 5066 
4966 LET B3=A& 
A910 LET Ad=16 
4926 LET Al=1l 
4930 GOSUB 5668 
4940 LET BS=A& 
4956 IF B3=B5 THEN 4936 
4960 LET Al=28 
4976 GOSUB 5066 


— 6LUBINFO 


TI-99 


Korrektur zum Programm 
Exon Runner 
für den Commodore 64 
aus Heft 9/84. 


Forth und Assembler. Hard- 
ware-Erforschung/Eigenbau. 
Interessenten wenden sich 


war « 


Computerclub 64 Wien 
Der Computerclub 64 ist ein 
seit Mai 1983 eingetragener 
Verein zur Verwendung und 
Benutzung des Computers. 
Seit der Gründung richten 
sich die Aktivitäten auf den 
Commodore 64 und allen 
dazu kompatiblen Geräten. 


Aufgaben und Aktivitäten 
Der 'Computerclub’ besitzt 
eine vereinseigene Buchbi- 
bliothek, ein Eprom-Pro- 
grammiergerät mit einem 
UV-Löschgerät, Original- 
programme mit Anleitungen 
und sonstiges notwendiges 
Zubehör. 

Im monatlich erscheinenden 
Mitteilungsblatt "CLUB 64’ 
werden interessante Artikel 
veröffentlicht, Neuerschei- 
nungen vorgestellt, Pro- 
gramme beschrieben, Tips 
und Tricks erklärt u.v.m. Alle 
Mitglieder haben die Mög- 
lichkeit, aktiv an der Ge- 
staltung mitzuarbeiten. Dar- 
über hinaus können sie ko- 
stenlos Privatinserate auf- 
geben. 


Hans-Böckler-Allee 155 
5100 Bad Aachen 
Tel. 0241/872205 


2. a Se Ze Au Er; 


Um einen engeren Kontakt 
zwischen unseren Mitglie- 
dern zu erreichen, werden re- 
gelmäßig Vereinstreffen - 
vorerst nur in Wien - ab- 
gehalten. Diese Meetings 
erfreuen sich großer Beliebt- 
heit und sind überdurch- 
schnittlich besucht. Dabei 
werden Probleme ausdisku- 
tiert, eigene Programm- und 
Hardware-Entwicklungen 

vorgestellt, Sammelbestel- 


lungen organisiert; dem Ein- . 


fallsreichtum und der Kreati- 
vität der Mitglieder sind da- 
bei keine Grenzen gesetzt. 
Besonders interessant sind 
die einzelnen Sektionen - 
User Groups genannt. Zur 
Zeit gibt es drei solcher, die 
sich mit PASCAL, COMAL 
und MASCHINEN- 
SPRACHE befassen. Zweck 
und Ziel dieser Sektionen ist 
ein reger Informations- und 
Erfahrungsaustausch, sowie 
die Übermittlung von fun- 
diertem Wissen. 

Um jedoch den gesellschaft- 
lichen Sinn nicht zu ver- 


TI-Computer (eV) in bitte an 1 2 

Aachen gegründet. Betät- Hartmut Dirks Zeile 1 muß mit 

gungsgebiet: Programmie- (Vorsitzender) GOSUB 3800 

rung in Basic, Pascal, Logo, App. 312 vervollständigt werden: 

Zeile 90 muß um die Ziffer 1 ergänzt werden. 


nachlässigen, werden auch 
viele Freizeitaktivitäten zum 
Selbstkostenpreis angebo- 
ten. 

Vom Sommernachtsfest, ei- 
ner abenteuerlichen Rätsel- 
rallyebis hin zu einem Raub- 
rittermahl erstreckt sich das 
breite Angebot. Aus diesen 
Gründen herrscht ein äu- 
Berst freundschaftliches Ver- 
einsleben, bei dem jedoch 
nicht die "Computerei’\ ver- 
gessen wird. 

Kosten 

Um dies alles zu verwirk- 
lichen, fallen natürlich hohe 
Kosten an (Porto, Kopien, 
Bücher,..). Daher müssen 
wir leider eine einmalige Bei- 
trittsgebühr von Os 50,- und 
einen jährlichen Mitglieds- 
beitrag von Ös 350,- verlan- 
gen. Da diese Einnahmen in 
Summe gerade kosten- 
deckend sind, freuen wir uns 
über jede noch so geringe 
Spende. 


Für Wünsche, Anregungen 


und Anmeldungen wenden 
Sie sich bitte an: 

Mag. Helmut Hackl 

1030 Wien, 

Erdbergstraße 134/4/7 

Tel.: 0222/73-87-722 


1010 Wien, 
Lugeck 2/3/42 
Tel.: 0222/53-28-50 


PS: Sie wollen einen Com- 
puter, sind aber ein Laie und 
vom Angebot überfordert. 
Wir beraten Sie gerne, so gut 
wir können - auch wenn Sie 
noch kein Mitglied sind! 


au y 


Commodore-Freaks 
Deutschlands tut Euch 
zusammen! 

Wir suchen Commodore 
Clubs und Besitzer aus allen 
Teilen Deutschlands zwecks 
Erfahrungs- und Programm- 
austausch. Wir, eine von 
Commodore unabhängige 
Gruppe, haben es uns zum 
Ziel gesetzt, eine riesige Pro- 
grammbibliothek für alle 
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Commodore-Systeme aufzu- 
bauen, von dem dann jeder 
Gebrauch “machen: kann. 
Egal, ob auf Kassette oder 
Diskette oder Listing. Der 
Beitrag? Ein Listing (ein Prg. 
auf Kass./Diskette) pro Mo- 
nat oder nützliche Tips und 
Tricks für das jeweilige Sy- 
stem, wobei es egal ist, ob es 
sich um Spiele oder Anwen- 


bietet. 


Computer-Bücher 


Die Referenztabelle eines jeden BASIC-Programmierers! 
Unentbehrlich für Konvertierungen! 


Wo immer Sie das BASIC-Listing eines Computers finden - sei es 
in Zeitschriften, Büchern, Clubmagazinen etc. - mit dieser Tabelle 
können Sie alle rechnerspezifischen Sonder- und Grafikbefehle, 
Ein- und Ausgabebefehle für Bildschirm, Drucker, Kassetten, und 
Disketten, Funktionen und Systembefehle in ihrer konkreten 
‚Anwendung nachschlagen. Bei Konvertierungsarbeiten kön- 
nen Sie sofort den für Ihren Computer zutreffenden Befehl 
ablesen. Computerumsteiger und Neulinge können mit Hilfe 
dieser Tabelle den Rechner ausfindig machen, der den von 
Ihnen benötigten BASIC-Befehlsvorrat hat, so daß die zu 
lösenden Probleme auch bewältigt werden können. Die 
große BASIC-Referenztabelle ist auch die große Hilfe im 
BASIC-Unterricht, da sie eine bisher nicht dagewesene 
Vollständigkeit von BASIC-Dialekten im Zusammenhang 


1375x980 mm patentgefaltet (1,3475 m’) und 96 Seiten 
Format 144x278mm — Bestell-Nr. LV-033-X 


Umfangreiche Software (Listings) mit 
ausführlicher Dokumentation der verschiedensten 


derprogramme handelt. For- 
dert das kostenlose Info an 
bei: 2 
Harald Kern 
Peterswälderstr. 8 

6452 Hainburg 

Kennwort: Deutsche Com- 
modore User 


ar kr ii ww ı nr ki a KR %‘ 


Arbeitsgemeinschaft 
Software-Anwender 


in den vergangenen Monaten 
ist ein Thema immer wieder in 
den verschiedenen Fach- 
zeitschriften aufgetaucht, daß 
zur Zeit auch im privaten Be- 
reich sehr viel Aufmerksam- 
keit erregt. 


Es handelt sich dabei um die 
Frage, was der Einzelne mit 
den Programmen für seinen 
Computer anfangen kann 
bzw. ob diese Software ge- 


Dateiverwaltung 
auch für den HX 20 


Methoden, Anwendungen 
und Programme 


52 
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17 Spielprogramme 
für TRS-B0 und Genie I/II 


Hi 


und 


Im Fachhandel prospekt RS gegen Freiumschlag, 


W-D. Luther-Verlag 


Elisabethenstraße 32 - 6555 SPRENDLINGEN 


COMPUTER 
was nun? 


Der 2. Schritt nach dem 
Kauf eines Computers. 


Fri [7] 


PASCALC 


Ein Tabellonkalkulations- 
Programm in PASCAL 


Harms Ce 


word 


der Verlag 

mit der großen 
BASIC-Referenz- 
tabelle aller 
gebräuchlichen 
Dialekte. 


| eine betrügerische Absicht 


tauscht, verkauft oder ko- 
piert werden darf. Die Rechts- 
unsicherheit ist inzwischen 
so groß geworden, daß nie- 
mand eine konkrete Stel- 
lungnahme abgeben kann. 

Händler, die sich durch sog. 
“Raubkopierer” geschädigt 
fühlen, beantragen wahllos 
Strafanzeigen und treffen 
damit fast immer die Fal- 
schen. Bei den Betroffenen, 
die eventuell sogar Besuch 
von der Kriminalpolizei er- 
halten, istin vielen Fällen die 
Panikstimmung so groß, daß 
sie sogar mit dem Gedanken 
spielen, ihr Hobby aufzuge- 
ben und den Computer zu 
verkaufen. Daß sich die 
Händler damit selbst schädi- 
gen, ist offensichtlich. Auch 
sind bereits Fälle vorgekom- 
men, bei denen eindeutig 


zugrunde gelegen hat. Erst 
vor einigen Wochen hat eine 
Pseudo-Firma aus Berlin un- 

ter Ausnutzung der allgemei- 

nen Unsicherheit an Klein- 

anzeigen-Inserenten Ab- 

mahnungen verschickt, um 

“auf.die Schnelle” Geld zu 

verdienen. Durch solche 

Machenschaften erhält die 

Computerei einen schlech- 

ten Ruf, der im Endeffekt alle 

Betroffenen schädigt. 

Da der einzelne Computer- 
freund (es handelt sich ja in 
der Regel um Jugendliche) 
kaum in der Lage ist, hier 
Klarheit zu schaffen, soll die 
ARBEITSGEMEINSCHAFT 
SOFTWARE-ANWENDER 

gegründet werden. . 
Wer sich für dieses Produkt 
interessiert oder der Arbeits- 
gemeinschaft beitreten will, 
kann sich an 


ROLF KNORRE 
POSTFACH 200102 
5600 WUPPERTAL 


wenden. Jeder Interessent er- 
hält dort weitere Informatio- 
nen (bitte einen frankierten 
Rückumschlag beilegen). 
Die Arbeitsgemeinschaft ist 
für jeden wichtig, der Soft- 
ware kauft, verkauft, kopiert 
und tauscht etc., unabhängig 
vom Computertyp. 


aıxxnx 
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Die Sußey alhputer. 


SVI-318 32 K RAM, erweiterbar bis 


144 K RAM, Erweitertes 
MICROSOFT-BASIC, integrierte 498 = 
DM "4 


Cursorsteuerung 

SVI-904 Datenrecorder, 1800 Baud, Zählwerk, 
Laufwerksteuerung durch SVI- 

318 oder 328 inkl. 2 Spielkas- 148 = 
setten DM y 
SVI-318-Set bestehend aus SVI-318 Basisgerät 
(82 K RAM, MICROSOFT-BASIC), 

SVI-904 Datenrecorder und 595 = 
Softwarepaket mit 5 Kassetten DM y 


Endlich die Alternative: SVI-318 II mit professio- 
neller Tastatur, 32 K RAM, 

sonst wie SVI-328 698 = 
Superangebot DM y 
SVI-328 32 K ROM, 80 K RAM, Erweitertes 


MICROSOFT-BASIC, Schreib- 
maschinentastatur, 10 Funk- 958 m 
tionstasten, 10er-Block DM y 


Super-Expander SVI-605, ein eingebautes Disket- 
tenlaufwerk (160 K), 


Centronics-Interface, 4 
freie Steckplätze, Be- 1 995 = 
triebssystem CP/M 2.2 DM Is y 


Super-Expander SVI-605 A, zwei eingebaute 
Diskettenlaufwerke (je 160 K), 


Centronics-Interface, 4 

freie Steckplätze, Be- 2 648 = 
triebssystem CP/M 2.2 DM = y 
Super-Expander SVI-605 B, mit Supersoftware- 


Paket, zwei eingebaute Diskettenlaufwerke (je 
320 K), Centronics-Interface, 4 freie Steckplätze, 


Betriebssystem CP/M 2.2, 
WordStar, Mailmerge, CalcStar, 3 748 = 
ReportStar, DataStar DM = y 


Direktversand 


SVI-328 Pro Profisystem bestehend aus: Compu- 
ter SVI-328, Super-Expander SVI-605 B (inkl. 
WordStar, Mailmerge, CalcStar, DataStar, Re- 
portStar) Betriebssystem CP/M 2.2, 
80-Zeichenkarte SVI-806, 
Datenmonitor Sakata 4 998 Pr 
DM = 1) 
Grafik-Tablett SVI-105, 186x 158mm 
Zeichenfläche, Kassette mit An- 
wender-Software inkl. 


DM 348,- 


Erweiterungskarten für SVI-605, A, B 


SVI-803 16 K-Speichererweite- 
rung (für SVI-318) 


SVI-805 RS 232, 
serielle Schnittstelle 


DM 298,- 
DM 398,- 
DM 378,- 


Joystick SVI-101, zwei Feuerknöpfe, 
vier Saugfüße, ergo- 
nomischer Handgriff 


SVI-806 80-Zeichenkarte 


SVI-807 64 K-RAM 
Speichererweiterung 


Joystick SVI-102, automatisches 
Dauerfeuer, zwei Feuerknöpfe, 
vier Saugfüße 


39,90 


(Joystick SVI-101 und SVI-102 auch 
für Atari und Commodore geeignet) 
Durch direkte Anbindung an das Lager und die Serviceabteilung des Generalimporteurs sind wir 
und über Hard- und Softwareneuheiten aktuell zu informieren. 


Sakata-Datenmonitor, 12”, 

18 MHZ, Antireflex-Ätzung 428 en 
SG 1000, grün DM y 
SA 1000, bernstein DM 468,- 


Farbmonitor Taxan Vision EX Composite Video 


und AGB, Audioteil, 14”, 
vielfältige Einstellmöglichkei- gu8 2 
ten DM y 


Epson-Drucker 


RX 80 DM 1.198,— FX 80 DM 1.848,— 
RX 80 FIT DM 1.398,— FX 100 DM 2.398,— 
Druckeranschlußkabel SVI-206. 1,5m, für parallele 
Schnittstelle DM 69,— 
Diskettenlaufwerk SVI-905, 160 K zur Erweiterung 
des Super-Expanders SVI-605 DM 748,— 


Mini-Expander SVI-602 zum Anschluß an SVI-318 
oder SVI-328 für eine Erweiterungskarte DM 59,— 
Centronics-Interface SVI-802 mit Kabel 206 zum 
Anschluß an Mini-Expander SVI-602 DM 59,— 


Die Software 


Kassettensoftware 

SVI-K 110 Einführung in das SVI-Basic 
inkl. 40seitigem Handbuch 

SVI-K 115  SVI-Dateiverwaltung 

SVI-K 122 SVI-Text 

SVI-K 129 SVI-Termin 

SVI-K 146 Disassembler 

SVI-K 147° Maschinen Code Monitor 

SVI-K 148 SVI-Spritegenerator 

SVI-K 149 SVI-Zeichengenerator 

SVI-K 179 Old Mac Farmer 

SVI-K 180 Tetra Horror 

SVI-K 181 Tele Bunny 

SVI-K 182 Turboat 

SVI-K 183 SASA 

SVI-K 184 NINJA 

SVI-K 185 Kung-Fu-Master 

SVI-K 188 Armoured Assault 

SVI-K 189 Spectron 

Cartridgesoftware 

SVI-C 220 Sector Alpha 

SVI-C 232 Frantic-Freddy 

SVI-C 236 Music-Mentor 

SVI-C 237 _ Super-Cross-Force 

SVI-C 291 Flipper-Slipper 

Diskettensoftware 

SVI-D 310 Einführung in das SVI-Basic DM 79,— 


SVI-D 315 SVI-Dateiverwaltung DM 59,— 
SVI-D 322 SVI-Text DM 79,— 
SVI-D 334 SVI-Lager DM 59,— 
SVI-D 348 SVI-Toolkit I DM 79— 


(SVI-Spritegenerator u. SVI- 
Zeichengenerator) 

SVI-D 349 SVI-Toolkit II DM 158,— 
(Disassembler und Maschinen- 
Code-Monitor) 

SVI-D 359 LISP 80 DM 189,— 

SVI-D 360 C-Compiler DM 189,— 

SVI-D 361 Turbo-PASCAL (Version 2.0) DM 268,— 

SVI-D 318 Nevada-FORTRAN (Compiler) DM 169,— 


SVI-D 382 Nevada-COBOL (Compiler) DM 169,— 
SVI-D 383 Nevada-PILOT (Interpreter) DM 169,— 
SVI-D 384 Nevada-EDIT (Editor) DM 169,— 
SVI-D 388 Old Mac Farmer DM 49,— 
SVI-D 389 Tetra Horror DM 4,— 
SVI-D 390 Tele Bunny DM 49,— 
SVI-D 391 Turboat DM 49,— 
SVI-D 392 SASA DM 4,— 
SVI-D 393 NINJA DM 4,— 
SVI-D 394 Kung-Fu-Master DM 8,— 


jederzeit in der Lage, das Komplettprogramm zügig zu liefern 
Nutzen Sie diese entscheidenden Vorteile. 


Computer-+-Elektronik 


p.t.m. Elektronik GmbH 
Computerdirektversand 

Die Dorfwiesen 10, 2730 Heeslingen 
Telefon 04281/5550 


K. Jamin 
Computer-Lexikon 


Die Computersprache bezeichnet man 
oft als Fachchinesisch, neue Begriffe 
und Formulierungen können oft nicht 
eingeordnet werden. Besonders die Ju- 
gendlichen müssen lernen, mit den 
neuen Ausdrücken klarzukommen, sie 
zu verstehen und anzuwenden. 

Das Computer-Lexikon ist die ideale 
Hilfestellung und ein exzellentes 
Nachschlagwerk. 

Die Begriffe werden ausreichend und 
verständlich erklärt, Bilder und Zeich- 
nungen unterstützen dies zusätzlich. 
Klaus Jamin, Professor für Datenverar- 
beitung, hat seine Erfahrungen in dem 
Computer-Lexikon in Form von leicht 
verständlichen Erklärungen fest- 
gehalten, ein Buch vom Profi für 
jedermann. 

Die Daten: 

Schneider, 1984, 317 S. DM 29,80 


H. Schumny (Hrsg.) 
Ausgewählte 
Basic-Computerspiele 
(Atari 800) 


8 Programme von 
Walter Schneider 


Der Band 13 der Programmbibliothek 
Mikrocomputer enthält 8 unterhalt- 
same Spiele von Walter Schneider (Ka- 
lah, Master Mind. Hotato, Ziffern 
streichen etc.), die in Basic für den 
Atari 800 geschrieben sind. Die Pro- 
gramme sind so angelegt, daß sie weit- 
gehend mit nur kleinen Änderungen 
auf allen Mikrocomputern lauffähig 
sind. 

Die Programme (Spiele) sind gut doku- 
mentiert, übersichtlich und strukturiert 
programmiert, sodaß sie vom Leser 
und Benutzer leicht nachvollzogen - 
u. U. auch geändert - werden können. 
Damit macht das Spielen doppelten 
Spaß: erstens durch das Verstehen der 
Funktionsweise des jeweiligen Pro- 
grammes und zweitens durch das Spie- 
len selbst. 

Zugleich wird das Buch dem interes- 
sierten Leser eine spielerische Einfüh- 
rung in Basic geben. 

Die Daten: Vieweg, 1. Aufl. 1984, 85 S. 
DM 19,80, 


OKTOBER 1934 


a HC-BÜCHERKISTE = 


Zaks/Labiak 


Programmierung 
des 6809 


Dieses Buch wurde für Erstbenutzer 
und fortgeschrittene Programmierer 
geschrieben. Es richtet sich an alle, die 
mit einem 6809-System (z.B. Dragon 32, 
Colour Genie oder Tandy Colorcom- 
puter) arbeiten. 

Der Leser erhält eine vollständige Ein- 
führung in die Assemblerpgrogram- 
mierung mit dem 6809-Mikroprozessor. 
Das Buch zeigt ihm, wie die Signale im 
Chip selbst gehandhabt werden und 
wie er sie zur Kontrolle von Eingabe/ 
Ausgabe-Funktionen verwenden kann. 
Dr. Rodnay Zaks istein Vorreiterin der 
Entwicklung industrieller Anwendun- 
gen von Mikroprozessoren und Verfas- 
ser mehrerer Standardwerke zu diesem 
Thema; William Labiak befaßt sich seit 
über 10 Jahren mit Anwendungen von 
Mini- und Mikrocomputern. 

Die Autoren stellen dem Leser einen 
mächtigen Mikroprozessor vor und leh- 
ren ihn, den 6809 wirksam für eigene 
Zwecke einzusetzen. 

Die Daten: 1. Aufl. 1984, 400 S., 150 
Abb., 44,- DM 
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J. W. Coffron 


Programmierung 
8086-8088 


des 


Ein Muß für alle Besitzer von 16-Bit- 
Computern der oberen Preisklasse, 
die mit diesem Prozessor ausgerüstet 
sind. Das sind besonders der IBM PC 
und seine kompatiblen Brüder, aber 
auch z.B. der HP 150 von Hewlett 
Packard. Vorkenntnisse in Maschi- 
nensprache sind nicht erforderlich. 
Eine allgemeine Einführung in die 
Arithmetik mit Bürozahlen, Oktalzah- 
len. Hexadezimalzahlen und BCD- 
Zahlen. Ausführliche Darstellung des 
Befehlssatzes des 8086/8088. Beispiel- 
programme, die speziell auf den IBM 
PC zugeschnitten sind, jedoch leicht 
auf andere Rechner übertragen wer- 
den können. 

Anhänge mit Tabellen: Befehlssatz. 
ASCII-Code etc. 

Die Programmierung in Maschinen- 
sprache erlaubt eine wesentliche Stei- 
gerung der Abarbeitungsgeschwindig- 
keit von Programmen gegenüber Pro- 
grammierung in Hochsprachen. Da- 
durch werden gewisse Anwendungen 
erst möglich. 

Dazu gehören: die schnelle Grafik. 
Spiele. Steuerung externer Geräte. 

Die Daten: Sybex. 1. Aufl. 1984, 312 S. 
48.- DM. 


T. Ritter 
Erfolg mit Multiplan 


Anwender aus dem geschäftlichen Be- 
reich. die das Tabellenkalkulations- 
programm Multiplan besitzen, und 
auch solche, die die Anschaffung erwä- 
gen und sich über die Möglichkeiten, 
die Ihnen damit zur Verfügung stehen, 
informieren wollen. werden den vorlie- 
genden Titel zu schätzen wissen. Dieses 
Buch setzt keinerlei Kenntnisse im 
Computerbereich voraus. Alles, was 
man zur Benutzung von Multiplan be- 
nötigt. wird von Grund'auf erklärt. 
Das Buch führt den Leser Schritt für 
Schritt in Multiplan ein. Zunächst wer- 
den einfache Anwendungen be- 
sprochen, aber mit zunehmendem 
Kenntnisstand dringt der Leser im- 
mer tiefer in die Geheimnisse von 
Multiplan ein und lernt. das Programm 
für jeden nur denkbaren Anwendungs- 
zweck optimal einzusetzen. 

Multiplan wird immer an Hand von 
konkreten und sinnvollen Anwen- 
dungsbeispielen am Rechner nachvoll- 
zogen werden können. Dieses Lernen 
durch die Praxis führt besonders schnell 
zu einer Vertrautheit mit dem Programm, 
die die spätere eigene Anwendung er- 
leichtert. 

Als Beispiel für die Möglichkeiten von 
Multiplan werden in diesem Buch un- 
ter anderem behandelt: Haushalts- 
buchführung. Auswertung der Ergeb- 
nisse einer Auto-Rallye. Erstellung von 
Rechnungen für eine Leihwagenfirma, 
Urlaubsplanung und als wissenschaft- 
liche Anwendung die Berechnung der 
Wärmeverteilung in einer Platte. 

Die Daten: Sybex, 1. Aufl. 1984, 208 S. 


38,- DM. 8 8 8 
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Floppy-Besitzer bisweilen 
zur Weißglut bringt. 

Die Diskette besitzt nur eine 
Ede Spiralspur. auf die 
maximal 64K pro Seite pas- 
6sen. Wenn ich von Maxi- 
malkapazität spreche, so 
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ex er 


di 


sen!) 


Directory auf den Bild- 
schirm und kann dann das 
gewünschte Program durch 
RUN "QD:PROGRAMM- 
NAME" starten. 


Leistungsfähige 
Sonderbefehle 

Da bei Konzeption des 
Sharp MZ-700er Systems die 
Floppy nicht einkalkuliert 
war (wie ja auch die oben 
schon erwähnte Daten- 
leitung beweist). sind die für 
die Verwaltung des Disk- 
Dateien nötigen Sonderbe- 
fehle in S-Basic nicht imple- 
mentiert. Auch hier zeigtsich 
der Vorzug des "clean com- 
puters”: die Erweiterung ist 
der Diskettenversion des 
MZ-700er-Basic beigepackt. 
der Benutzer merkt sie erst. 
wenn sie ihm zur Verfügung 
steht. Und das ist eine ganz 
schön umfangreiche Portion 
an neuen Anweisungen: 
(hier gemeinsam mit denje- 
nigen SBasic-Befehlen. die 
auch in Bezug auf die QD- 
Verwaltung gelten). 


RUN: Laden und direktes 


Die Hifivideo 84 in Düsseldorf 
präsentierte sich vom 24.8.- 
30.8.84 von ihrer Sonnen- 
seite. 

Auf über 48.000qm? wurden 
von ca. 350 Ausstellern aus al- 
ler Welt die neuesten Pro- 
dukte vorgestellt. 

Neben den Schwerpunkten 
der Unterhaltungselektronik 
mit Video, Funk, TV, Hifi, 
Satelliten und BTX sind jetzt 
die Heimcomputer zum festen 
Bestandteil der Hifivideo 
geworden. 

Mit diesen Komponenten ge- 
hört die Düsseldorfer Ausstel- 
lung zu einer der bedeutensten 
und größten ihrer Art. 

Hier wurden neue Techniken 
zukunftsweisend dargestellt 
und bei einigen Systemen be- 
reits zur Perfektion gebracht. 
Folgen Sie uns einen kleinen 
Rundgang durch die Hallen: 


MSX - die Zauberformel 


Mit Spannung erwartet wur- 
den endlich die ersten MSX- 


Ausführen einer BASIC- 
Datei von der QuickDisk. 
LOAD: Laden einer Datei. 
erweitert um QD-Zugriff. 
SAVE: Abspeichern einer 
Datei. erweitert um QD- 
Zugriff 

MERGE: Laden einer Datei. 
zusätzlich zum bereits vor- 
handenen Programm 
ROPEN#: Eröffnen einer 
sequentiellen Datei (Lesen). 
INPUT#: Lesen einer se- 
quentiellen Datei. 
WOPEN#: Eröffnen einer 
sequentiellen Datei (Schrei- 
ben) 

PRINT#: Schreiben in eine 
sequentielle Datei. 
CLOSE#: Schließen einer 
sequentiellen Datei. 

USR: Aufrufen eines Ma- 
schinenunterprogramms mit 
Variablenübergabe. 

DIR: Ausgabe des Disketten- 
Inhaltsverzeichnisses 
CHAIN: Verketten von 
Basic-Programmen mit Varia- 
blenübergabe. 

KILL#: Löschen einer Datei- 
eröffnungsanweisung. 
DEFAULT: Festlegen des 
Standard-Datei-Kanals. 


Computer der Öffentlichkeit 


vorgestellt. Nähere Infor- 
mationen über die MSX- 
Produkte waren leider nicht 
zu erhalten. die Hersteller 
konzentrierten sich völlig 
auf ihre Hauptprodukte wie 
Hifi-Anlagen. Fernseher usw. 
So wurden wir mit Prospekt- 
material abgespeist. Lie- 
fertermine und Preise konn- 
ten ebenfalls nicht genannt 
werden. 

An den MSX-Ständen hör- 
ten wir Erklärungen wie z.B. 
“unser Techniker ist leider 
nicht mitgekommen”. 


EOF#: Logische Variable 
zur Erkennung des Datei- 
endes. 

LABEL: Markieren einer 
Programmzeile durch einen 
Namen. 

WAIT: Erzeugen einer Warte- 
funktion. 

SEARCH: Suchen einer 
Zeichenkette im Programm- 
text. 

XOR: Binäre 
oder Verknüpfung. 
NOT: Binäres Negieren. 
OR: Binäre Oder-Verknüp- 
fung. 

AND: Binäre Und-Verknüp- 


Exklusiv- 


fung. 
INIT:  Initialisierung der 
QuickDisk. 


Der Recorder muß nicht 
sterben 
Interessant ist die Tatsache. 
daß sich der Datenrecorder 
nicht aufs Altenteil begeben 
soll. sondern als Zulieferer 
und Partner der Floppy fröh- 
liche Urständ feiern darf. Als 
Speichereinheit Nr. 2. adres- 
siert mit CMT. kann das Cas- 
settengerät parallel ange- 
sprochen werden. So kann 


Düsseldorf im Blickpunkt 


Eine Ausnahme sind hier 
Spectravideo und Sony. die 
schon seit geraumer Zeit mit 
ihren MSX-Geräten aufdem 
Markt sind. 

Bis auf diese Ausnahmen 


gleicht die angekündigte 
MSX-Welle eher einem 
Plätschern. 


Die Vorankündigungen schei- 
nen sich nicht zu be- 
wahrheiten. es ist wohl erst 
Mitte nächsten Jahres mit 
den MSX-Computern zu 
rechnen. 


man auf Band befindliche 
Programme bequem auf 
Diskette überspielen. Die Be- 
triebsspannung erhält der 
Recorder durch einen klei- 
nen "Versorgungs-Bus” auf 
der Floppy-Rückseite. 


Fazit: 

Wer mit dem Sharp viel und 
engagiert arbeitet. sollte die 
Anschaffung des Laufwerkes 
erwägen. insbesondere dann. 
wenn er Besitzer des 711 ist. 
also über ein eingebautes 
Cassettengerät nicht verfügt. 
Trotz der etwas ungeschick- 
ten Lösung des Daten- 
übertragungsteils (volumi- 
nöses Interface und stören- 
des Koax-Kabel) bilden 
Computer und Floppy eine 
kompakte und handliche 
Einheit. Die unbestreitbaren 
Qualitäten rechtfertigen den 
Preis von rund 700 Mark 
vollauf. 


hifivideo 84 


| 


News: 

Großer Andrang herrschte 
schließlich bei den “altein- 
gesessenen” wie etwa Atari. 
Commodore oder Sinclair. 
Hier standen die neuen 
Commodore-Micros 116. C- 
16 und 264 im Brennpunkt. 
Etwas überraschend war die 
Tatsache. daß Commodore 
den C116 entgegen vorange- 
gangenen Meldungen nun 
doch in Deutschland ver- 
treibt. 

Allerdings hielt Commodore 
Einzelheiten und Neu- 
igkeiten der Hard- und Soft- 
ware bewußt zurück. die 
CFA (Commodore-Fachaus- 
stellung) stand schließlich 
vor der Tür. 

Unter der Leitung des ehe- 
maligen Commodore-Chefs 
Jack Tramiel. versucht Atari 
seine Geräte nun verstärkt 
auf den deutschen Markt zu 
bringen. 

Die Atari-Serie wird nun mit 


80 HoMEcoMPUTER 


OKTOBER 1984 


neuer Soft- und Hardware 
gezielt gefördert. nach den 
Umsatzverlusten der letzten 
Jahre ist mit den Atari‘s wie- 
der zu rechnen. Der Com- 
puter der Stunde ist zweifel- 
los der Schneider CPC-464. 
der erstmals vorgestellt 
wurde. 

Mit dem CPC-464 präsen- 
tiert sich ein leistungsfähiges 
Kompaktsystem. das wohl 
ernsthafte Konkurrenz zum 
C-64 darstellt. 


Laser 3000 von Sanyo. 


6502 CPU. 64K RAM. 32K ROM. Auflösung von 560x192 
den Laser 3000 zum leistungsstärksten nach der 210/3 
Kompatibilität kann auf eine große Software 


Wegweiser der Zukunft 


Der Schneider CPC-464 wurde zum absoluteı 
und Datenrecorder bietet 


R0O-CPU. 64K RAM. 27 F 
640x200 Bildpunkten. Windo 
Der 3-Kanal Tongenerator kann in Stereo programmiert wer 


enner. Das Kompaktsvstem mit eingebautem Monitor 
Auflösung von 


'erschiedene Peripherie wie z.B. 


Floppy steht schon jetzt zur Verfüg 
Ab Oktober im Handel 


Der Schneider besticht 
durch enorme  Leistungs- 
fähigkeit. hervorragendes 
Styling. Schreibmaschi- 
nentastatur und eingebauten 
Datenrecorder. 

Der Hit ist schließlich der 
eingebaute Farbmonitor. 
zum Preis von ca. 1.400.- ist 
das Schneider-Kompaktsy- 
stem zukunftsweisend. 
Großer Arbeitsspeicher. her- 
vorragende Klang- und Gra- 
fikqualitäten sind nur einige 
Vorzüge des CPC. 

Es steht schon jetzt eine Pa- 
lette von Peripherie und Soft- 
ware zur Verfügung. der CPC 
wird ab Oktober erhältlich 
sein. 

In Zukunft wird man an 
diesem Gerät wohl nicht vor- 
beigehen. Schneider dürfte 
auf dem Gebiet der Heim- 
computer die größte Sen- 
sation geschaffen haben. 
Die ersten Informationen 
waren auch über den neuen 
Laser 3000 erhältlich. ein 
Vorführgerät stand aller- 
dings nicht zur Verfügung. 
Mit dem neuen Gerät geht 
Laser in den PC-Bereich 
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über. Der Laser 3000 ist 
Apple-Software kompatibel. 
dadurch kann aufeine große 
Softwarepalette zugegriffen 
werden. 

Im Oktober/November 1984 
wird der Laser zum Preis von 
ca. DM 1.700.- erhältlich 
sein. Aufgrund der Kompati- 
bilität ein interessanter 
Rechner. ob ersich gegen die 
harte Konkurrenz durchset- 
zen kann bleibt abzuwar- 
ten. 

Ein sehr interessanter Rech- 
ner ist der in England herge- 
stellte Acorn B. der erstmals 
vorgestellt wurde. 

Mit diesem in England be- 
reits eingeführten Computer 
rundet Acorn seine Ange- 
botspalette ab. 

Einen neuen Computer ent- 
deckten wir am Stand der 
Firma Sharp. Dort präsen- 
tierte sich mit dem PC 5000 
ein tragbarer Superrechner. 
Schreibmaschinentastatur. 
aufklappbares 8-Zeilen Dis- 
play und ein eingebauter 
DIN A4 Thermo-Drucker 
geben dem PC5000 eine be- 
sondere Note. 


dpunkte und 4-Kanal-Tongenerator machen 
ie. Aufgrund seiner Apple II-Software 
Nette zugegriffen werden. 


Aufgrund seiner enormen 
Leistungs- und Ausbaufähig- 
keit scheint der angegebene 
Preis von ca. DM 6.500.- an- 
gemessen. der PC5000 liegt 
damit im mittleren PC- 
Bereich. 


Zubehör: 

Auf dem Zubehörmarkt für 
Heimcomputer hat sich eini- 
ges getan. neue Soft- und 
Hardwareprodukte ergän- 
zen die inzwischen reich- 
haltigen Angebote. 

Die Renner waren die Soft- 
wareprogramme für Atari- 
und Commodorerechner. 
hier wurden die neuesten 
amerikanischen Toppro- 
gramme vorgestellt. 
Besonders hervorzuheben 
sind hier die Programme von 
Dynamics. Ariolasoft. Data 
Becker. Coleco und der Fa. 
Microhändler. Diese Firmen 
haben anscheinend den 
richtigen Weg gefunden. 
Spiel-. Lern- und Anwender- 
programme in guter Qualität 
anzubieten. Dynamics wird 
in Zukunft neben den Pro- 
grammen verstärkt Zubehör 
für alle gängigen Heimcom- 
puter anbieten. 

Weitere Neuigkeiten gibt es 
von der Verbindung Heim- 
computer-BTX. 

BTX ist in aller Munde. die 
ersten Decoder zum Anschluß 
der Heimcomputer an 
das BTX-System wurden be- 
reits angeboten. 


Durch den BTX-Anschluß 
wird die Vielfalt der Anwen- 
dungen von Microcom- 
putern erheblich erweitert. 
hier dürfte wohl noch einiges 
zu erwarten sein. Zu sehen 
waren die Decoder für 
Commodore- und Atari- 
geräte. die Demonstrationen 
waren eindrucksvoll. 

Mit dieser neuen Technik 
werden Heimcomputer zum 
Terminal. die Grenzen der 
Entwicklung sind bei weitem 
nicht abzusehen. 

Die Akustik-Koppler waren 
die Hits der Hacker. doch 
sind nur wenige Geräte FTZ- 
genehmigt. 

Auch hier eröffnet sich eine 
Fülle von Anwendungsmög- 
lichkeiten. Datenbanken 
werden in Zukunft wie Pilze 


aus dem Boden schießen 
(sprießen). 
Durch die Masse an Zu- 


behör werden die Einsatz- 
möglichkeiten de Heimcom- 
puter immer vielfältiger und 
damit interessanter. 

Was für Insider längst klar 
war. ist in Düsseldorf auch 
denjenigen aufgefallen. die 
ihr Hauptaugenmerk auf 
Film. Funk. Fernsehen ge- 
lenkt hatten. 

Der Siegeszug der Computer 
ist nicht aufzuhalten. gerade 
im privaten Bereich werden 
sie zunehmend gefragter. in- 
teressanter und unentbehr- 
licher. 

Ein Wink dafür scheint die 
Tatsache zu sein. daß immer 
mehr namhafte Hersteller an- 
derer Branchen auf den 
Computermarkt drängen. 
Konkurrenz belebt das 
Marktgeschehen. dies wurde 
auf der Hifivideo'84 in Düs- 
seldorf ganz deutlich. 
Profitieren wird der Ver- 
braucher. der aber auch die 
Qual der Wahl hat. 


Am Rande bemerkt: 
Beim Rundgang sind uns ei- 
nige Produkte aufgefallen. 


Hit-Bit von Sony 
Sony bietet bereits sämtliches Zubehör für den MSX Hit-Bit an. 
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rosmen - 


HX-10 von Toshiba 


Der MSX-Rechner kommt erst 1985 auf den deutschen Markt. 


die wir* Ihnen nicht vor- 
enthalten wollen. 

Sehr praktisch erschien uns 
ein Homecomputer-Schrank 
der Fa. CPV. in dem auch 
sämtliche Peripherie Platz 
finden. 

Ansprechendes Design und 
gute Verarbeitung lassen den 


Computer-Schrank in jedem 
Zimmer gut aussehen. 

Die Unordnung verschwin- 
det. das Auf- und Abbauen 
der Geräte entfällt durch die 
ausziehbaren Schubfächer. 
Zur Verwaltung von Vi- 
deotheken entdeckten wir 
den Cirrus FX14 Videocom- 


puter. Er kann mit Drucker. 
Kassensystem. Laser-Strich- 
code und Telefonmodem 
ausgestattet werden. 

Ein Organisationssystem 
für Videotheken. 

Mit der Bezeichnung “Fami- 
liencomputer” wirbt Thom- 
son fürihr neues Modell TO 7. 
Ausgestattet mit  einge- 
bautem Lichtgriffel. großem 
Peripherieangebot und reich- 
haltiger Software wird auch 
der TO7 seinen Käuferkreis 
finden. 

Für Fachhändler ist der 
'Software-Programmcomputer 
RÖMOX eine kleine Sensa- 
tion. Der aus den USA stam- 
mende ROMOX von Uni- 
mex karın für alle gängigen 
Heimcomputer und Video- 
spiele Software auf eine 
Cartridge programmieren. 
Die Cartridges können im- 


mer neu programmiert wer- 
den. der Käufer spart unnötige 


Materialkosten. 
Der Händler erspart sich 
große Lagerhaltung und 


kann so immer die aktuellen 
Programme griffbereit ha- 
ben. 

Eine kompakte Einheit 
präsentiert sich mit der auf- 
sehenerregenden Crossmedia- 
Anlage von JVC. 
Plattenspieler. Casset- 
tenrecorder. Equaliner. 
Audio-Video Umschaltpult. 
CD-Spieler. Tuner und 
Grafik-Synthesizer sind in 
einer Anlage vereint. 

Die Besonderheit ist der 
Grafik-Systhesizer. der 
Musik auf dem Fernseher in 
sechs verschiedenen Darstel- 
lungen anzeigt. 


(sr) 
wrhr r* 


Als die Computer-Freaks in 
Deutschland voller Er- 
wartung am 15. August vor 
dem Fernseher saßen und 
sich auf lohnende Infor- 
mationen zum Thema "Com- 
puter-Zeitschriften freuten. 
die im Rahmen der Ju- 
gendsendung "DIREKT" 
auf dem zweiten Kanal flim- 
mern sollten. wurden Sie 
doch etwas enttäuscht. Der 
in Aussicht gestellte Beitrag 
entpuppte sich als eine 
dreieinhalbminütige Schleich- 
werbung für ein einzelnes 
Magazin, wie sie von einer 
beauftragten Werbe-Agentur 
nicht besser hätte gemacht 
werden können. Wer von ei- 
ner “öffentlich-rechtlichen” 
Fernsehanstalt ein Mindest- 
maß an Objektivität erwartet 
hatte. wurde in dieser Hin- 
sicht wieder einmal eines Bes- 
seren (?) belehrt. Wenn ein 
solcher redaktioneller Bei- 
trag” in Werbe-Block ausge- 
strahlt und gemäß des ver- 
einbarten Tarifs honoriert 
wird. ist nichts dagegen ein- 
zuwenden. Wird jedoch zur 


besten Sendezeit mit journa- 
listisch untauglichen Mitteln 
ein bestimmtes Erzeugnis fa- 
vorisiert, ohne der jeweiligen 
Konkurrenz ähnliche Gele- 
genheit zur Selbstdarstel- 
lung einzuräumen, verstößt 


Hallo, Fans- 


mir 
Femseh-Freaky ist wieder da!|schon die ganze Zeit überlegt 


Ni6t Ihr, wos ıc! 


der verantwortliche Sende- 
leiter eindeutig gegen den 
Gesetzesauftrag und jedes 
Fairplay. das selbst TV- 
Monopolisten unterschrei- 
ben sollten. Mit viel größerer 
Berechtigung als im von uns 


Skandal oder Armutszeugnis? 


Der “COMPUTER-TIP” in “DIREKT” als Eigentor in Sachen Information. 


angesprochenen Fall könnte 
“Fernseh-Freaky” sich mit 
der folgenden Gedanken- 
spielerei an die Öffentlich- 
keit wenden... 

(sk) 


Öffentlich- Rechtliche” Fernsehanstalten gibt's ja #0 viele: 
ahe Kosten sie eine Nenge Geld... 
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Iins & 
Iricks 


Unser kleiner Workshop bringt 
wieder praktische Program- 
mierhilfen für Könner und sol- 
che, die es schnellstens wer- 
den wollen. ”ZS-Copy” und 
"Merge CBM 64” sind zwei 
Routinen, die jeder Commo- 
dore-User unbedingt drauf 
haben sollte. Auf Seite 33 
erfahren Sie mehr. 


Speziell für die Erfordernisse der Mikroprozessor-Anwendung 
wurde das SC 1142 von bitronic entwickelt. Lesen Sie auf Seite5, 


Commodore 


Logik im 
Basic-Programm 


Wie man Systematik in sein 
Selbstgestricktes bringt 
Teil 4 


Heute beschäftigen wir uns 
mit einem ebenso wichtigen 
wie interessanten Element 
jeglicher Programmierarbeit, 
nämlich dem Thema ”Ent- 
scheidungen”. Was es da an 
Wissenswertem gibt, finden 
Sie bestimmt auf Seite 54. 
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mit welchen Werten das neue Gerät aufwartet. 


smpube mib 


A0/% Das unabhängige Magazin für Anwender und Interessenten von Commodore Computern 


Zubehör- und 


angetreten 


S 
ith dem 
omputer 


Wir haben für Sie zwei an- 
spruchsvolle Schachpro- 
gramme getestet, nämlich 
Colossus 2.0 von CDS und 
CAISSA von Dynamics. Beide 
Programme sind in ihrer Art 
außergewöhnlich und sehr 
spielstark. Schlagen Sie so- 
fort unseren Test auf Seite 30 
auf. 


vC-20 caM 3032 


2,80 sF 


The Pit 


für den 
V6-20 + 16K 


In 88 Tagen sollte es bei Jules 
Verne um die Welt gehen. In 
99 Sekunden müssen Sie bei 
diesem spannenden Grä- 
berspiel den Schatz geborgen 
haben. Wenn Sie diesen tollen 
Vertreter einer erfolgreichen 
Spielidee näher kennenlernen 
wollen, sollten Sie sich 
schnurstracks auf Seite 44 
begeben. 
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ANZEIGE 


VIDEO VIS 


gibt es im gut geführten 
Zeitschriftenhandel, beim Bahn- 


a wV hofsbuchhandel, im gut sortierten Video- 
Ne Y. \ P handel und als Clubzeitschrift in der aktuellen 
ge0 zeit # . OR } Videothek. Auch bereits erschienene Ausgaben mit inter- 
\\ 4 X \r.\® 5 er | \0g essanten Redaktionsthemen sind noch beim Verlag gegen eine 
gie ww - “u 2 ermäßigte Gebühr erhältlich. Verlag Erwin Jungfer GmbH & Co. KG, 


3420 Herzberg am Harz, Postfach 1209. 
VIDEO VIS, die Zeitschrift mit den fünf Redaktionsteilen: « dem großen Vilmteil x der 


TeleVision, dem Heft im Heft » dem interessanten Video-Anwenderteil x Testberichten und 
Ratschlägen « dem playtronic-Sonderteil über Homecomputer und Videospiele. 
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